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EHI TU’! MI VUOI? 



Aggiungi gusto alla 
tua mela con le 
nostre periferiche 

Per il tuo Apple abbiamo le 
stampanti ad aghi con matrici 9 
x 9 seriali o parallele con velo¬ 
cità di stampa da 80 a 400 carat¬ 
teri per secondo, da 80 a 200 
colonne, con percorso ottimiz¬ 
zato e la famosa CORRESPON- 
DENCE QUALITY per le Vo¬ 
stre lettere personalizzate. Ho- 
neywell; le printers tutte 
Italiane a conferma di una im¬ 
magine Made in Italy che ac¬ 
quista sempre di più importan¬ 
za sui mercati Internazionali. 


SERVIZIO 

OEM-D DATA BASE è il distri¬ 
butore di prodotti OEM che vi 




offre soprattutto un servizio di 
prim’ordine. 

I nostri tecnici vi assicurano la 
massima collaborazione duran¬ 
te rinerfacciamento delle peri¬ 
feriche con il vostro sistema. 
L'assistenza tecnica e la manu¬ 
tenzione - tra le più importanti 
performances della OEM-D 
DATA BASE - vi garantiscono la 
costante efficenza dei nostri 
prodotti. 

OEM-D DATA BASE significa 
qualità e servizio. OEM-D 
DATA BASE è sicurezza. 
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Sono tre per te 

Un solo pacchetto e tre funzioni: data base, word-processor e 
spreadsheet. Senza cambiar dischetto. 


Mela da passeggio 

Apple //c: c come compatto, c come completo, c come compatibile, ma 
anche portatile, leggero, versatile. 


Tasso fisso un po’ variabile 

Titoli di stato, cartelle fondiarie, obbligazioni. Anche il reddito fisso può 
costituire un valido investimento per difendere i propri risparmi. 


Un mostro tira l’altro 

Riuscirete a mangiare tutti i mostri che si trovano nel labirinto evitandoli 
quando diventano arancione?. 


Per vincere lo stress 

I videogiochi, secondo gli esperti, hanno un difetto: sono ripetitivi. 
Stress , il nuovo gioco di Applicando, non ha questo handicap, anzi... 


Memoria riga per riga 

Spesso è necessario localizzare alcuni segmenti di un programma. 
Linefinder rende veloce e semplice questa operazione. 


Compilatore in formato libero 

Che cos’è il compilatore? Perché si dice che il linguaggio Pascal ha un 
formato libero? Risponde la seconda puntata del corso Pascal. 


Quando l’accesso è casuale 

L’Apple soft per semplificare il processo di impaccamento dei record e 
per recuperare con facilità le informazioni dal dischetto. 


Grafici a passeggio 

Questo programma consente il dump della pagina grafica da Apple/// a 
una stampante semigrafica. 


Le rubriche 

6 Applicosa 10 Applichi 
82 Appliquanto 92 Lettere 
93 Mercatino delle mele 82 Disk Service 






Investire in obbligazioni, pagina 27 



Il Pucman, pagina 39 



STRESS: per giocare e ideare giochi, pagina 46 


Grafici con Apple ///, pagina 87 
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REALIZZAZIONE EDITORIALE 
Editing Studio 


Tutti i diritti di riproduzione e tra¬ 
duzione di testi, articoli, progetti, 
illustrazioni, disegni, listati di pro¬ 
grammi, fotografie ecc., sono ri¬ 
servati a termini di legge. I pro¬ 
grammi pubblicati su Applicando 
possono essere utilizzati per 
scopi privati, scientifici e dilettan¬ 
tistici, ma ne sono vietati sfrutta¬ 
menti e utilizzazioni commerciali. 
I manoscritti, i disegni, le foto, an¬ 
che se non pubblicati, non si re¬ 
stituiscono. 
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Dopo le azioni» le obbligazioni. In questo 
numero di Applicando ecco un programma per 
calcolarne i rendimenti effettivi. Visti i 
commenti positivi suscitati da Investor» che» 
ricordate» consentiva di gestire un 
portafoglio azionario realizzando anche i 
grafici con 1' andamento dei singoli titoli» i 
minimi e i massimi e le medie mobili a 13 e 52 
giorni» anche questa volta speriamo di aver 
fatto centro. 

Certo le applicazioni a sfondo economico 
sono quelle per cui un personal computer più 
facilmente giustifica il suo prezzo. Ma questo 
numero di Applicando non trascura nemmeno 
le Utilities (Linefinder, a pag.55, o i grafici 
per Apple///» pag.87), né i giochi (Pucman» 
pag.39» o Stress* pag.46). Fra i nuovi 
.programmi» segnaliamo la dettagliata 
recensione di Tre per te (pag.12)» mentre 
continuano i corsi di Applesoft e di Pascal. 

La copertina invece è stata dedicata a 
Apple//c» il nuovo compatto portatile con 
disk-drive incorporato» che» appena 
presentato» sta già spopolando come il 
Macintosh. Anche per.quest' ultimo computer 
Applicando pubblicherà nei prossimi numeri 
listati e recensioni di programmi. 



P.S. Applicando cresce: questo numero ha 
sedici pagine in più» per un totale di 102. 
Anche la diffusione è aumentata» superando 
le 20.000 copie. Ne siamo grati agli abbonati, 
ai lettori e agli inserzionisti. 
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Chi d’insulto 
ferisce... 

In alternativa ai protago¬ 
nisti tradizionali dei video- 
games, alieni, astronavi, 
mostri, la J. Soft, società di¬ 
stributrice di software legata 
alla Technoclub di Milano 
(via Rosellini 12, telefono 
02/683797), propone, in col¬ 
laborazione con la Dinosft, 
due nuovi Appiegiochi: Me- 
lopoli e Avventura nel ca¬ 
stello. 

Melopoli è la versione 
computerizzata del famoso 
Monopoli. L'obiettivo dei 
giocatori (da un minimo di 
due a un massimo di sei), è 
quello di diventare re del¬ 
l’industria turistica. Sullo 
schermo appare il percorso 
composto da caselle che rap¬ 
presentano alberghi, locan¬ 
de, agenzie di viaggi e tra¬ 
sporti, tutte legate al mondo 
del turismo. Una volta stabi¬ 
lito il numero dei giocatori e 
scelti i simboli per ognuno, 
Apple assegnerà il capitale 
di partenza, uguale per tutti, 
e deciderà casualmente chi 
darà inizio al gioco. Pre¬ 
mendo il tasto return si lan¬ 
ciano i dadi, se esce un nu¬ 
mero doppio si acquisisce il 
diritto di un altro tiro. Chi 
finisce su una casella libera 
può acquistarla dalla banca 
selezionando l'opzione 
“compro" o passare il turno 
selezionando l’opzione 
“passo”. Chi invece finisce 
su una casella già acquistata 
diventa “turista’’ e dovrà pa¬ 
gare la vacanza sborsando la 
cifra indicata. Attenzione 
alle caselle speciali e agli im¬ 
previsti che potranno essere 
positivi o negativi a seconda 
della fortuna del giocatore. 
Vincitore è colui che racco¬ 
glie per primo la cifra di un 
milione. Chi si stanca può 
salvare la situazione sul di¬ 
schetto e poi riprenderla. 

Il secondo gioco. Avven¬ 
tura nel castello , ha fatto 
passare notti insonni a 
chiunque abbia inserito an¬ 
che una sola volta il dischet¬ 
to, dirigenti Apple compre¬ 
si. Non è importante studia¬ 
re le istruzioni, il meccani- 
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smo si spiega da sé. È una 
vera e propria sfida con Co¬ 
lombini, l'ideatore del gio¬ 
co, ma soprattutto con la 
propria fantasia. Inserito il 
dischetto il computer co¬ 
mincierà a proporvi situa¬ 
zioni da cui sembrerà impos¬ 
sibile uscire e solo la vostra 
ingegnosità vi permetterà di 
salvare (si fa per dire) la pel¬ 
le. L'Apple sarà il vostro al¬ 
ter ego, che eseguirà pedis¬ 
sequamente le vostre istru¬ 
zioni. Vi ricorderà dove sie¬ 
te e cosa avete, guarderà nei 
posti che vi interessano, sal¬ 
terà quando vorrete saltare, 
aprirà quello che volete 
aprire... Purtroppo vi dirà 
anche che è impossibile fare 
quello che pensate, e atten¬ 
derà le vostre nuove istru¬ 
zioni con un impietoso “Co¬ 
sa devo fare?". Per riuscire a 
risolvere il problema biso¬ 
gna studiare la situazione 
con calma, e prendere in 


Melopoli sul video è la nuova 
confezione 6\ Avventura nel 
Castello. 

considerazione anche quello 
che può sembrare impossi¬ 
bile (o troppo scontato). 

D’altronde anche arrivare 
in fondo all’avventura sem¬ 
bra impossibile, già prima di 
atterrare con il vostro aereo 
nella zona del castello. La 
soluzione però esiste, solo 
che è diabolicamente diffici¬ 
le trovarla. Un ultimo consi¬ 
glio per i più nervosi: non 
insultate il computer, altri¬ 
menti... 

Entrambi i giochi girano 
su Apple //plus, //e e anche 
sul nuovo //c, costano en¬ 
trambi 48 mila lire e si pos¬ 
sono trovare in via Rosellini 
al numero 12. 

Il Mousepaint per Apple //e e Ho. 


Il successo ottenuto dal 
programma grafico Mac¬ 
Paint per il Macintosh ha 
spinto la Apple a rendere 
possibile questa applicazio¬ 
ne di software anche sul //e e 
sul neonato Ile. Chiamato 
Mousepaint , il programma 
utilizza, limitatamente ai 
punti grafici del video, tutte 
le funzioni presenti nell’ap¬ 
plicazione creata per il Mac. 
Inserito il dischetto lo scher¬ 
mo si trasforma in un tavolo 
da disegnatore dove, accan¬ 
to al foglio bianco, sono pre¬ 
senti tutti gli strumenti ne¬ 
cessari a un grafico. Utiliz¬ 
zando il mouse si potrà sce¬ 
gliere di usare la matita, la 
gomma, il righello, il pen¬ 
nello e realizzare forme geo¬ 
metriche di tutti i tipi. Pun¬ 
tando con la freccia guidata 
dal Mouse il simbolo “A", è 
possibile inserire testi e titoli 
utilizzando un numero mol¬ 
to ampio di caratteri e di 
corpi. Il disegno potrà esse¬ 
re memorizzato su dischet¬ 
to. Chi dispone della stam¬ 
pante Image Writer, potrà 
ottenere l’esatta hard copy 
dello schermo. 

Il programma Mousepaint 
viene fornito gratuitamente 
a chi acquista il Mouse. Il 
prezzo del Mouse per Apple 
Ile è di 190 mila lire, più Iva, 
per Apple //e 270 mila, Iva 
esclusa. 
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La confezione di Cage , il dischetto che insegna l’inglese. 


Polaroid colora 
l’hard copy 

Chi vuole ottenere una 
hard copy di una particolare 
immagine visualizzata dal 
personal computer può, at¬ 
tualmente, contare su diver¬ 
si modelli di stampanti grafi¬ 
che a colori, tutti affidabili 
ma con un limite tecnico ben 
preciso: la riuscita della ri- 
produzione è condizionata 
dalla qualità della carta e 
dall’uso corretto del pro¬ 
gramma di stampa. L’alter¬ 
nativa era teoricamente rap¬ 
presentata, fino a oggi, dai 
videoprinter, applicabili sia 
ai personal computer sia ai 
normali televisori, capaci di 
prestazioni estremamente 
sofisticate e studiati per un 
utilizzo professionale, ma 
dal prezzo inaccessibile. 

Proprio da queste consi¬ 
derazioni è nato, in casa Po¬ 
laroid, un apparecchio per 
la stampa di immagini vi¬ 
deo, chiamato Palette, stu¬ 
diato per usi amatoriali. 

11 nuovo apparecchio con¬ 
sente di fotografare ciò che 
appare sul monitor, riceven¬ 
do e traducendo i segnali 
elettronici delle diverse im¬ 
magini, e di ottenere imma- 



II nuovo sistema Palette, 
della Polaroid, per 
fotografare ciò che appare 
sul video. 

gini a colori anche se il mo¬ 
nitor è in bianco e nero. Pa¬ 
lette è impostato sugli stessi 
principi dei videoprinter più 
sofisticati, e l’operatore può 
attribuire una colorazione a 
piacere alle immagini, foto¬ 
grafarle e, se il risultato non 
è di suo gradimento, cam¬ 
biare anche radicalmente gli 
effetti cromatici. 


Votati 

dal dischetto 

«The Cage (Computer 
Assisted Grammar of En- 
glish) non è un corso», affer¬ 
mano alla Apple, «ma una 
risorsa per l'apprendimento 
della grammatica inglese». 
Corredato in forma detta¬ 
gliata ed esauriente da un 
manuale per ogni dischetto, 


il programma analizza ogni 
struttura grammaticale po¬ 
nendo una particolare atten¬ 
zione ai problemi specifici 
degli studenti italiani. Di¬ 
sponibile in ogni momento 
la traduzione di quanto ap¬ 
pare sul video, il program¬ 
ma propone anche alcuni 
esercizi valutando i processi 
di apprendimento dello stu¬ 
dente. 


Un programma 
per il programma 

Notizie culturali, grafici, 
partiture musicali, biblio¬ 
grafie, indici ragionati di va¬ 
rio tipo è quello che propo¬ 
ne Radiotext , una trasmis¬ 
sione diffusa ogni venerdì 
alle ore 16 per la durata di 
otto settimane da Radio 3. 
Rivolta agli utilizzatori di 
home e personal computer, 
Radiotext permette di racco¬ 
gliere i dati mandati in onda 
semplicemente collegando 
l’uscita per la cuffia della ra¬ 
dio con l’input della memo¬ 
ria di massa del calcolatore. 
Tutte le informazioni tra¬ 
smesse potranno essere sal¬ 
vate sul supporto dati del 
proprio computer. 

A questa iniziativa di Ra¬ 
dio 3 si affianca l’Arcime- 
dia-Lega Informatica che 
metterà a disposizione le 
proprie sedi come punto di 
riferimento per tutti coloro 
che avranno interesse a con¬ 
frontare le proprie esperien¬ 
ze. Chi volesse maggiori in¬ 
formazioni o avesse dei pro¬ 
blemi di ricezione può tele¬ 
fonare, dalle ore 15.30 alle 
ore 19.30, ai numeri 06/ 
3579295-6. 
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lo applico, 
tu applichi? 


La pubblicità su 
Applicando è informazione. 
Chi legge Applicando 
possiede un computer 
Apple o sta per acquistarlo. 
Oppure sta per cambiarlo 
con un Apple Ile. 

O con un Lisa. 

Oppure non lo cambia 
affatto, se lo tiene stretto, 
ma vuol sapere dove, 
come e cosa fa 
veramente per lui. 

Una nuova marca 
di dischetti? 

Una nuova 
Software House? 

Una nuova stampante 
a basso prezzo? 

Per chi applica, 
è importante saperlo. 
Subito. 


Per la pubblicità 


l d Strada, 24 

Milano San Felice (Segrate) 
A Tel. (02) 75 32 151 

STUDIOSFERA (02) 75 33 939 



Qui si taglia 
con Ritmo 

Per realizzarlo sono stati 
necessari due anni di lavoro 
e, appena terminata la fase 
di collaudo, è stato prenota¬ 
to da numerose aziende e ri¬ 
chiesto perfino in Germa¬ 
nia: si tratta di Ritmo, un 
software per l’ottimizzazio- 
ne del taglio del legno messo 
a punto dalla Aga di Gua¬ 
stalla e destinato principal¬ 
mente all'industria del mo¬ 
bile e al settore dell’arreda¬ 
mento in generale. 

Il programma, particolar¬ 
mente sofisticato, raccoglie 
tutte le informazioni relati¬ 
ve al pezzo di legno da ta¬ 
gliare (dimensioni, venatu- 


L’occasione 
vale per III 

Occasione da non per¬ 
dere per chi avesse in¬ 
tenzione di acquistare 
un Apple III. Contro 
5,499 milioni necessari 
per la console con 
128Kb e un drive incor¬ 
porato per floppy disk 
da 5-1/4", la Apple of¬ 
fre una console a 
256Kb con disk drive, il 
monitor III e un proFile 
da 5Mb sborsando 
4,999 milioni di lire. 




re, ecc.), al tipo di taglio che 
si vuole effettuare e al nu¬ 
mero e alle misure dei pezzi 
che si vogliono ottenere. In 
più Ritmo tiene conto del ti¬ 
po di macchina con cui si do¬ 
vrà operare e di numerose 
altre specifiche tecniche: 
una volta esaminati tutti i 
dati il sistema fornisce le 
esatte indicazioni per un uti¬ 
lizzo ottimale del legname a 
disposizione. Predisposto 
per operare in quattro lin¬ 
gue (italiano, inglese, fran¬ 
cese e tedesco), il program¬ 
ma è fornito con particola¬ 
reggiati manuali di istruzio¬ 
ni. Per maggiori informazio¬ 
ni: Aga, viale Piave 6, Gua¬ 
stalla (Reggio Emilia), tele¬ 
fono 0522/826239. 


aera 




Lavorazione del legno ottimizzata col programma Ritmo. 
















d’uomo, 

CA ENCODEX 


Ora c’è 
anche l’ASS 


15 ANNI FA COMPUTER 

TECNICA 
TORTURA.. 


ENCODEX 

ENCODEX 

ENCODEX 

ENCODEX 

ENCODEX 

ENCODEX 


è ASSISTENZA TECNICA per il Vostro 
Personal Computer APPLE 

è la prima società indipendente di 
ASSISTENZA TECNICA in Italia 

è l’unica organizzazione autorizzata 
da APPLE per «ASSISTENZA TECNICA 
IN LOCO su tutto il territorio nazionale 

Vi propone il servizio IN LOCO 
su tutto il territorio nazionale 
con tempestività d’intervento 
ovunque esso venga richiesto 

è ASSISTENZA TELEFONICA: 
il servizio permette di risolvere le Vostre 
difficoltà tecniche anche al telefono 

è ASSISTENZA TECNICA 24 ORE: 
la nostra segreteria telefonica è operativa 
per 24 ore sette giorni su sette. 



E.H.S. 


encodex hardware Service s.r.l. 


sede: milano, via padova, n. 38 

tei. 28.43.864 - 28.95.762 - 28.96.758 

telex: encsat • I 322268 


pappié 

assistenza autorizzata 
in loco 






































Mela 

in concerto 

A Doris Norton, musici¬ 
sta-programmatrice sono 
serviti sei mesi per realizza¬ 
re Personal Computer , così 
è stato intitolato il nuovissi¬ 
mo long playing e solo cin¬ 
que ore per inciderlo, otte¬ 
nendo risultati sorprenden¬ 
ti: della musica effettiva¬ 
mente diramata, per il 95%, 
da un personal. «Nel disco 
precedente ero riuscita a 
creare una musica che impli¬ 
cava solo per il 30% un in¬ 
tervento estraneo alla mac¬ 
china», dice Doris Norton, 
«con Personal Computer ho 
realizzato un’opera ad alto 
livello creata, si può final¬ 
mente dire, nella sua totalità 
utilizzando l’Apple sia in fa¬ 
se di composizione sia per 
diramare le informazioni 
musicali sotto forma di im¬ 
pulsi». Contemporanea¬ 
mente agli impulsi sonori sul 
video compaiono, in una 
grafica ad alta risoluzione, 
le diverse partiture musicali, 
dando in questo modo la 
possibilità al pubblico di ve¬ 


Doris Norton, computer singer, ha scelto Apple per la sua musica. 


dere il lavoro fatto dall'Ap¬ 
ple. Per realizzare questo di¬ 
sco Doris Norton ha utiliz¬ 
zato un Apple II e un Apple 
//e interfacciati in coppia, un 
sintetizzatore Roland e dei 
prototipi di periferiche con 
16 tracce separate. 


28 anni, da dieci musicista 
a livello professionale, sei 
con gli Antonius Ree e quat¬ 
tro come solista, quattro Lp 
all’attivo, Doris Norton, da 
sempre artefice di musica 
elettronica, è da due anni ri¬ 
tenuta dalla critica specializ¬ 
zata caposcuola della com¬ 
puter music. In procinto di 
partire per una tournée che 
prevede esibizioni in quasi 
40 città italiane. Doris Nor¬ 
ton ha avuto in prova dalla 
Apple Italia un nuovissimo 
//c che verrà utilizzato insie¬ 
me agli altri Apple II e //e 
nel corso degli spettacoli. La 
tournée si concluderà il 4 
agosto con una registrazione 
per la Rai Tv. Personal 
Computer è disponibile co¬ 
me Lp, cassetta e Compact. 

Il ginocchio 
va in banca 

Sulle prime era indeciso 
su quale computer puntare 
per risolvere nel modo mi¬ 
gliore il problema dell’archi¬ 
viazione delle cartelle clini¬ 
che dei suoi pazienti ma, do¬ 
po un giro di telefonate a 
colleghi e amici, un Apple 
//e gli è sembrata la soluzio- 

Dario Capitani, ortopedico e 
medico sportivo. 


ne più ovvia. «In modo par¬ 
ticolare dopo aver visto co¬ 
me gira il programma Tre 
per te non ho più avuto dub¬ 
bi», dice ad Applicando Da¬ 
rio Capitani, 31 anni, medi¬ 
co ortopedico traumatologo 
dell’ospedale Gaetano Pini 
di Milano e medico sportivo 
(in questa veste ha seguito, 
insieme con i colleghi Tredi¬ 
ci e Semenzino la carovana 
dei corridori del giro ciclisti¬ 
co d'Italia). 

L'intento di Capitani è 
quello di archiviare tutti i 
dati sui traumi che si verifi¬ 
cano in determinate zone 
del corpo. «Ho cominciato 
con il ginocchio. Un lavoro 
lungo poiché per disporre di 
uno standard di valutazione 
le diagnosi le devo, per ora, 
eseguire personalmente». Si 
tratta forse della creazione 
di un supermedico informa¬ 
tico in grado di diagnostica- 
re i malanni di menischi e 
legamenti in tempo reale? 
«Non proprio in questi ter¬ 
mini», dice Capitani. «Lo 
scopo che mi prefiggo è po¬ 
ter disporre di una banca da¬ 
ti molto ricca che mi aiuti 
nella diagnosi. L'occhio del 
medico insieme alla memo¬ 
ria del personal possono 
raggiungere, credo, risultati 
sorprendenti». 
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Campionesse 
di giornata 

Quando i responsabili 
dell’Associazione italiana 
allevatori si trovarono nella 
necessità di migliorare il si¬ 
stema di controllo della qua¬ 
lità del latte prodotto dai lo¬ 
ro associati, pensarono subi¬ 
to a un rimedio computeriz¬ 
zato. Così è stato sviluppato 
un sistema informativo arti¬ 
colato su livelli provinciali, 
regionali e nazionale che, 
oltre a costituire una banca 
dati con le caratteristiche 
genetiche e di produttività 
di ogni mucca da latte, com¬ 
prendeva anche l’acquisizio¬ 
ne in tempo reale dei risulta¬ 
ti delle analisi dei campioni 
di latte eseguite nei labora¬ 
tori regionali. 

L’installazione pilota 
(realizzata con contributi 
della Cee) è entrata in fun¬ 
zione in questi giorni a Cre¬ 
ma, presso il laboratorio 
dell’Aral (è l’Associazione 
degli allevatori della Lom¬ 
bardia). Per la progettazio¬ 
ne del sistema, l’associazio¬ 


ne si è valsa del contributo di 
Gilberto Roccabianca, 34 
anni, un informatico che nei 
primi anni 70 ha fatto parte 
del gruppo di ricerca e svi¬ 
luppo hardware del Labem 
70, un minicomputer tutto 
italiano impiegato in istalla¬ 
zioni per il controllo dei pro¬ 


cessi industriali, in laborato¬ 
ri di ricerca nucleare e per 
applicazioni biomediche. 
Successivamente Rocca¬ 
bianca si è impegnato nel 
campo del software per l’au¬ 
tomazione di centri di anali¬ 
si e si è occupato di proble¬ 
matiche sanitarie, rimanen¬ 
do però sempre fedele al¬ 
l’impiego di calcolatori pic¬ 
coli e flessibili, rifuggendo 
per quanto possibile dai me¬ 
gacomputer. 

«Nella progettazione del 
sistema Arai è stata seguita 
fino in fondo la logica del 
piccolo è bello» dice Rocca¬ 
bianca. «Per questo si è scel¬ 
to di collegare a ciascuno dei 
sei strumenti del laboratorio 
un Apple //e». Un altro Ap¬ 
ple, poi, svolge funzioni di 
controllo e supervisione, e 
tutti gli apparecchi scrivono 
i dati su un unico disco Cor- 
vus in configurazione Con- 
stellation. «Il Corvus è stato 
scelto perché, oltre a essere 
estremamente flessibile e fa¬ 
cile da usare», dice Rocca¬ 
bianca, «è risultato più eco¬ 
nomico rispetto ad altre so¬ 
luzioni più classiche». 

Oggi il sistema di Crema 
si avvia ad analizzare ogni 
giorno il latte di più di 8 mila 

Gilberto Roccabianca (a 
sinistra) e un tecnico al 
lavoro al centro Arai di 
Crema (in alto). 


mucche di tutta la Lombar¬ 
dia: i risultati delle analisi 
vengono memorizzati su 
floppy da 8” compatibili 
Ibm/34 e inviati nuovamen¬ 
te alle sedi provinciali, da 
dove vengono trasmessi sia 
al calcolatore della sede na¬ 
zionale di Roma (che è in 
grado in ogni momento di 
sapere qual è la mucca che, 
in Italia, produce più latte e 
di conseguenza qual è il tipo 
di mangime e la quantità 
usata), sia agli allevatori che 
possono così sapere se il loro 
latte è di buona qualità. 

Nel caso che qualche 
mucca non rispetti gli stan¬ 
dard, i tecnici delle sedi 
prendono contatto con l’al¬ 
levatore e suggeriscono mo¬ 
difiche alla dieta degli ani¬ 
mali. Inutile dire che anche 
la dieta viene preparata con 
l’aiuto del calcolatore, te¬ 
nendo conto dei foraggi di 
cui l’allevatore può dispor¬ 
re, della stagione, del costo 
sul mercato dei prodotti, 
ecc. 

I tecnici dell’associazio¬ 
ne, comunque, stanno già 
pensando agli sviluppi futuri 
del sistema e intendono, per 
prima cosa, installare un 
personal computer in ogni 
allevamento. Per informa¬ 
zioni: Arai, viale Kennedy 
30, Crema (CR) , tei. 
0373/85575. 
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Un solo pacchetto per tre funzioni: data-base, word-processor e 
spreadsheet. Senza cambiar dischetto. E passando da una 
funzione all’altra senza uscire dal programma. 

E trasferendo i file dallo schedario al foglio elettronico 
e da questo al word-processor. E... 


Sono tre 
per te 


O ccorre un Apple//e (con scheda 
80 colonne), o un Apple//c (me¬ 
glio se con drive aggiuntivo). E Tre per 
te , che nella versione americana si 
chiama AppleWorks. Per prima cosa si 
inserisce il dischetto che avvia il pro¬ 
gramma: dopo qualche secondo sullo 
schermo appare l’intestazione «Ap¬ 
pleWorks (TM) Software Integrato», 


e il messaggio «Metti il disco PRO¬ 
GRAMMA nel Drive 1 e premi Re¬ 
turn». Una piccola scritta sulla destra 
dello schermo, in basso, avverte che 
sono disponibili 55K. 

Inserito il disco PROGRAMMA e 
pigiato il tasto Return, il computer 
chiede la «data di oggi». A questo pun¬ 
to compare il Menù Base (Figura 1), la 


cui prima opzione, «Aggiungi file sulla 
scrivania», sottintende che lo schermo 
con Tre per te va considerato appunto 
come una scrivania, sul piano della 
quale possono essere presenti contem¬ 
poraneamente più documenti. E con 
Tre per te infatti si possono avere con¬ 
temporaneamente disponibili, senza 
cambiare dischetto, testi, tabelle di 
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calcolo e schede di data-base. 

Dunque si comincia con raggiunge¬ 
re file sulla scrivania scegliendo l’op¬ 
zione 1. A questo punto compare il 
submenù «Aggiungi file» (Figura 2), 
che consente di attingere i file dal di¬ 
sco che si trova già inserito nel drive 2, 
oppure da un altro dischetto, oppure 
ancora di creare nuovi file di testo 
(word-processor), schedari di data-ba¬ 
se, o fogli di calcolo elettronico 
(spreadsheet). 

Word-processor 

Chi usa per la prima volta Tre per te, 
a questo punto do\ ra creare dei file ex 
novo. Supponiamo che scelga di crea¬ 
re un file di testo. Si troverà davanti 
aH’ulteriore scelta (Figura 3): crearlo 
appunto ex novo, oppure da un file di 
testo ASCII preesistente e da trasfor¬ 
mare. Scegliendo «Ex novo» compare 
la scritta: «Batti un nome per il nuovo 
file». Appena fornito il nome, suppo¬ 
niamo «Piana testo», si passa alla vi¬ 
deoscrittura vera e propria (Figura 4). 
Qui si serbe come su un qualunque 
sistema di word-processing, con possi¬ 
bilità di correzioni, modifiche sullo 
schermo, ricerche di parole, eccetera. 
Nell’angolo in basso a destra resta 
sempre l'indicazione di Aiuto: basta 
schiacciare contemporaneamente il 
tasto Mela vuota e il punto interrogati¬ 
vo per vedere il menù di aiuto, il quale 
visualizza dieci comandi per volta. Per 
vedere gli altri è sufficiente schiacciare 
le frecce in su o in giù (Figura 5). In 
qualunque momento, per tornare alla 
situazione o ai menù precedenti basta 
battere il tasto ESC, e nell’angolo in 
alto a destra dello schermo viene ricor¬ 
dato. 

Tornando alla pagina del word-pro¬ 
cessor, verrà voglia di esplorare cosa 
succede se si schiaccia Mela vuota-P 
(Figura 6), dove la P sta per parame¬ 
tri. Ecco: sulla metà superiore dello 
schermo continuerà ad essere visualiz¬ 
zato il testo che si sta scrivendo, men¬ 
tre nella metà inferiore appare una ri¬ 
ga in caratteri inversi nella quale sono 
evidenziati i parametri in vigore al mo¬ 
mento. Sotto questa riga sono elencati 
i vari parametri possibili, che consen¬ 
tono la scelta dei caratteri (anche il 



proporzionale, giustificato e non), 
dell’impaginazione, del neretto, del 
sottolineato, delle note a pie’ di pagi¬ 
na, eccetera. 


File: Prova testo REV/AGG/MODIFICA Esc: Menù Base 

Prova di scrittura con ‘AppleWorks*, nella versione italiana 

detta ‘Tre per te‘, il programma che consente di lavorare 

contemporaneamente su mele, schedari di data base, e fogli 

di calcolo elettronici, e di passare dagli uni agli altri 

senza avviare per ciascuno nuovi programmi né dover cambiare 

il dischetto dati. Figura 4 


I parametri che vengono scelti ver¬ 
ranno evidenziati nella riga di control¬ 
lo, ma valgono solo dal punto in cui 
sono stati inseriti nel testo in poi, cioè 
dalla posizione del cursore nel mo¬ 
mento in cui sono stati attivati. Sono di 
tipo mnemonico (per esempio IS e FS 
per inizio e fine sottolineatura) e ven¬ 
gono effettivamente inseriti nel testo, 
e possono essere visti schiacciando 
Mela vuota-Z, mentre rischiacciando 
Mela vuota-Z scompaiono dallo scher¬ 
mo. Questa possibilità è molto impor¬ 
tante perché se si decidesse strada fa- 
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HyperGraphics. Ideale per chi deve 
creare conferenze, lezioni interattive, 
seminari, presentazioni di sicuro effetto con 
grafica, testi, suoni, colori, animazioni. 
In edizione originale americana. 
Lire 600.000 + Iva (Abbonati 
ad Applicando lire 550.000 + Iva). 

MicroTSP. Ideale per previsioni 
di vendite, analisi e previsioni dei costi, 
analisi finanziaria e previsioni 
macroeconomiche. Offre la possibilità 
di conservare, manipolare e 
trasferire serie di dati, applicando tutte 
le più note tecniche statistiche. 
In edizione originale americana. 
Lire 600.000 4- Iva (Abbonati 
ad Applicando lire 550.000 + Iva). 
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nizio e alla fine delle parole che si desi¬ 
derano sottolineate. 


A-C Cerca la comparsa di... 

A-D Duplica (copia) testo (taglia e incoila inclusi) 

A-E Elimina (cancella) testo 

A-K Calcola i numeri di pagina 

A-M Muove testo (taglia e incolla inclusi) 

A-N Cambia Nome al file 

A-P Parametri per il formato di stampa 

A-R Rimpiazza le comparse di... 

A-S Stampa 

A-T Mette/toglie le tabulazioni 

A-Z Zoom tra solo testo e testo 

con le opzioni di stampa 


A-Spazio 

Control-N 

Control-S 

RETURN 

DELETE 

Frecce 

A-Freccia 

A-Freccia 

A-Freccia 

A-Freccia 

TAB 

A-TAB 

A-l 

fino a 
A-? 


Spazio forzato 

Inizio/fine neretto 

Inizio/fine sottolineatura 

Marca la fine paragrafo 

Cancella il carattere prima del cursore 

Muovono il cursore. 


su 

Torna indietro di una pagina 

giù 

Va 

avanti di una pagina 

des. 

Va 

alla parola successiva 

sin. 

Va 

alla parola precedente 


Va 

alla tabulazione successiva 


Va 

alla tabulazione precedente 


Va 

a inizio file 


Va 

a fine file 


Figura 5 


Data-base 

Se dalla pagina di videoscrittura si 
schiaccia il tasto ESC si tornerà al me¬ 
nù base. Scegliendo ancora l’opzione 1 
si può aggiungere sulla scrivania uno 
schedario di data-base, anche questo 
da creare ex novo (opzione 4 della Fi¬ 
gura 2). In questo caso il submenù 
chiederà se il nuovo file lo si vuol crea¬ 
re appunto ex novo, oppure da un file 
di testo ASCII, da un file di Quick 
File, o da un file DIF (Figura 7). Sce¬ 
gliendo l’opzione 1, «Ex novo», biso¬ 
gnerà dare un nome al file, e si passa 
subito alla predisposizione di campi, 
cioè all’impostazione di ciascuna sche¬ 
da del data-base (Figura 8). Chi cono¬ 
sce già Quick File qui è avvantaggiato, 
perché questa parte del programma è 
praticamente identica: cancellando la 
dizione Campo 1 che compare dove va 
appunto inserito il primo campo, si 
batte quel che si desidera; per esem¬ 
pio, per uno schedario di libri si scrive¬ 
rà: Autore. Poi Titolo, Editore, ecce¬ 
tera. Non occorre definire la lunghez¬ 
za dei campi (che però al massimo pos¬ 
sono essere di 80 caratteri meno quelli 
usati per la definizione, come dire che 
nel campo Autore si disporrà al massi¬ 
mo di 74 caratteri), né precisare se il 
contenuto sarà alfanumerico o nume¬ 
rico. Il numero massimo di campi di¬ 
sponibili è 30, ma se si superano i quin¬ 
dici campi lo spazio disponibile per 
ciascuno scenderà da 80 a 40 caratteri. 

Il data-base di Tre per te può essere 


cendo di eliminare dei parametri inde¬ 
siderati bisognerà prima evidenziarli 
con lo Zoom (Mela vuota-Z), poi posi¬ 
zionare il cursore in coincidenza con il 
parametro da eliminare, e infine 
schiacciare Mela vuota-E, dove la E 
sta per eliminare. 

Anche i comandi sono di tipo mne¬ 
monico e facili da ricordare con un po’ 
di pratica. Per esempio Mela vuota-C 
serve per cercare qualcosa all’interno 
del testo, Mela vuota-R per cercare e 
rimpiazzare, Mela vuota-D per dupli¬ 
care una parte del testo, Mela vuota-S 
per stampare, Mela vuota-H per stam¬ 
pare una hard copy dello schermo (le 
figure di quest’articolo sono state otte¬ 
nute così), eccetera. 

Per inserire neretti o sottolineature 
nel testo mentre si scrive esiste una 
scorciatoia semplicissima che evita di 
dover passare ogni volta dal menù dei 
parametri: basta battere Control-N al¬ 
l’inizio e alla fine delle parole che si 
vogliono in neretto, e Control-S all’i- 


Filei Prova testo PARAMETRI DI STtflPA Esc: Rev/Agg/Moditica 

Prova di scrittura con ‘AppleWorks*, nella versione italiana 
detta Tre per te*, il programma che consente di lavorare 
contemporaneamente su itele, schedari di data base, e togli 
di calcolo elettronici, e di passare dagli uni agli altri 
senza avviare per ciascuno nuovi prograrvti né dover cartbiare 
il dischetto dati. 


L0=8.0 MS=1.0 MD=1.0 CP=10 NG AC=12.0 0.0 M&=2.0 LP=4 1S 


Parametro: NG: Non Giusti!. 

CN: Centrato 

LC: Larghezza Carta AC: Altezza Carta 
MS: Margine Sinist. MA: Margine Alto 
MD: Margine Destro MB: Margine Basso 
CP: Car./Polìice LP: Linee/Pollice 
PI: ProporzionaleT 1S: Spazio Singolo 
P2: Proporzionale-2 2S: Spazio Doppio 
RI: Rientranza 3S: Spazio Triplo 
Gl: 6iusti4icato PN: Pagina Nuova 
Figura 6 


IG: Inizio Gruppo FN: Fine Neretto 
FG: Fine Gruppo I*: Inizio Apice 
TE: Testata F*: Fine Apice 

NO: Nota piè pag. 1-: Inizio Pedice 
SR: Salta Riga F-: Fine Pedice 
NP: Numero Pagina IS: Inizio Sottolio 
PO: Pausa Ogni pag. FS: Fine Sottolin 
PQ: Pausa Qui SP: Stampa Pag. n. 
FM: Fissa Marcatore IT: Intr. Tastiera 
IN: Inizio Neretto 
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modificato in qualsiasi momento ag¬ 
giungendo nuove voci o modificando 
l’ordine in cui devono comparire. Pos¬ 
sono anche essere eliminati interi cam¬ 
pi; in questo caso il computer chiederà 
conferma visto che gli eventuali dati in 
essi contenuti verranno cancellati. Le 
schede poi potranno essere visualizza¬ 
te una per una, oppure schiacciando 
Mela vuota-Z (Zoom) il loro contenu¬ 
to potrà apparire sotto forma di tabel¬ 
la. Perché la tabella sia impaginata co¬ 
me si desidera, basta schiacciare Mela 
vuota-L e lasciarsi guidare dalle istru¬ 
zioni in italiano, che spiegano come 
far vedere un campo, allargarne uno, 
stringere un altro, non farne vedere 
un’altro, eccetera. 

Anche qui è sempre in funzione il 
menù di aiuto, ottenibile battendo 
Mela vuota-? (Figura 9), mentre bat¬ 
tendo Mela vuota-S (Stampa) viene 
offerta la scelta fra un’impaginazione 
di stampa già predisposta, una nuova 
impaginazione a tabella (da predispor- 



Figura 7 


Figura 8 

File: Prova database CtfIBIA NOME/CAMPO Esc: Rev/Agg/Modifica 


File: Prova database INSERIMENTO RECORD Esc: Elinina Valore 


None canpo Record 1 di 3 


Canpo 1 


Autore: Dante Alighieri 

! Parane tri: 

Titolo: La Divina Camedia 

Editore: Mondadori 



! Canbia none canpo 

Anno: 1956 


! Freccia sù Và al none file 

Lire: - 


! Freccia giù Uà al canpo successiv 

Posizione: H29 


! &-I Inserisce nuovo canpo 

Note I: Inferno Purgatorio Paradiso 
Note 2: - 
Note 3: - 


Batti un valore o usa i conandi § 


re), una nuova impaginazione a «eti¬ 
chette», più la possibilità di duplicare 
o di cancellare un formato di stampa 
già preparato. Chiedendo di imposta¬ 
re una nuova impaginazione, occorre¬ 
rà dargli un nome, e si potrà passare al 
menù di impostazione (Figura 10). 
Osservando la figura si noterà che è 
possibile anche «Definire un campo 
calcolato», perché il data-base di Tre 
per te può essere utilizzato anche per 
semplici conteggi, per esempio i totali 
delle note spese, o calcoli di percen¬ 
tuali Iva da aggiungere alle singole 
voci. 

Infine, schiacciando ancora una vol¬ 
ta Mela vuota-P, si passa al menù delle 
opzioni di stampa (Figura 12), mentre 
con Mela vuota-S si stampa. La stam¬ 


55K Disp. Batti un valore o usa i 


pa però può avvenire oltre che su 
stampante anche su video (per un con¬ 
trollo dell’impaginazione), sul Block 
Notes (per il trasferimento a un file del 
word-processor, o su un file DIF per il 
trasferimento sullo spreadsheet. 

Spreadsheet 

Tornando con una serie di ESC al 
Menù Base si può chiedere di creare 
un nuovo documento per lo spread¬ 
sheet. Come al solito lo si può creare 
ex novo, oppure da un file DIF, o an¬ 
che da un file VisiCalc preesistenti. 
Insistendo nel volerli creare ex novo, 
verrà chiesto di dare un nome al nuovo 
documento, dopodiché ci si trova su 
un foglio di calcolo tipo VisiCalc, con 
molte possibilità in più (per esempio si 


§ 52K Disp. 


possono allargare o restringere singole 
colonne lasciando le altre immutate, 
oppure si può scrivere in una casella 
un testo anche più lungo della casella 
stessa, con allargamento dinamico e 
automatico di quest’ultima, o si posso¬ 
no proteggere le celle) e poche possi¬ 
bilità in meno rispetto a VisiCalc (per 
esempio non esiste la funzione @IS- 
ERR, nc la possibilità di visualizzazio¬ 
ne grafica con gli asterischi). 

I soliti tasti Mela vuota-? consento¬ 
no di vedere il menù di aiuto (Figura 
a). che evidenzia almeno altri due 
vantaggi rispetto a Visicalc: si può fare 
l’ordinamento alfabetico o numerico 
delle righe sulla base dei contenuti di 
una colonna (come dire che si possono 
ordinare dei cataloghi per prezzo cre- 
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A-C Cerca tutti i record contenenti... 

A-D Duplica (copia) record (anche taglia e incolla) 
A-E Elimina (cancella) record 

A-I Inserisci un nuovo record prirea 

del record principale 
A-L Canbia Layout dei campi 

A-M Muove record (taglia e incolla) 

A-N Cambia Nome al file o ai campi 
A-0 Ordina secondo questo campo 

A-R Cambia le Regole di selezione 

A-M Mette/toglie Malori standard 

per un campo 

A-Z Zoom su un record. Zoom 

su più record 

A- B Copia il valore immediatamente prima 
(so1o nel formato a più record) 

RETURN Accetta 

TAB Ma al campo successivo 

A-TAB Ma al campo precedente 

Freccia su/giù Ma su o giù 

A-Freccia su Torna indietro di una pagina 
A-Freccia giù Ma avanti di una pagina 
A-l Ma all'inizio del file 

fino a 

A-9 Ma alla fine del file 

Figura 9 


scente, oppure per ordine alfabetico 
dei prodotti), e si possono evidenziare 
con il solito Mela vuota-Z (Zoom) le 
formule inserite nelle caselle, che pos¬ 
sono quindi essere stampate, volendo, 
all’interno della tabella, in modo mol¬ 
to più efficace di quanto non succeda 
con il VisiCalc (Figura 14). 

Ovviamente si potrà stampare an¬ 
che lo spreadsheet sul Block Notes, 
per il trasferimento al word-processor, 
su disco in formato testo, o su disco in 
formato DIF. 

Ora che abbiamo predisposto (e an¬ 
zi disponiamo) sulla scrivania più di un 
file, possiamo vedere cosa accade se, 
dal Menù Base, scegliamo l’opzione 2, 
«Lavorare con un altro file già sulla 
scrivania». Quel che si vede sullo 
schermo è raffigurato in Figura 13: 
con le frecce verticali (o battendone il 
numero) si seleziona il file con cui si 
intende lavorare, e si batte Return. Il 
salvataggio di tutti i file che sono stati 
aperti e modificati avviene solo alla 
fine della sessione di lavoro. Per mag¬ 
giore sicurezza è comunque prevista 
un’opzione di salvataggio del singolo 
file durante il lavoro. 

Se invece si desidera lavorare con 
un file che non è ancora sulla scriva¬ 
nia, basta, dal Menù Base, scegliere 
l’opzione 1, «Aggiungere file sulla 
scrivania». Il computer andrà a cerca¬ 
re nel disco dati, solitamente inserito 
nel drive 2, e mostrerà l’elenco dei file 
disponibili. A questo punto si sceglie¬ 
rà mediante le frecce verticali, sovrap¬ 
ponendo il cursore al file che interes¬ 
sa. Schiacciando Return verrà subito 
caricato in memoria il file selezionato. 


Ma si può chiedere di caricare anche 
più di un file alla volta. Si procede 
così: si sceglie il file con le frecce verti¬ 
cali, e lo si marca con la freccia destra; 
poi si ripete l’operazione marcandone 


un’altro, e così via, e quando si schiac- 
cerà Return tutti i file selezionati ver¬ 
ranno caricati. In caso di ripensamen¬ 
to si potrà comunque sempre smarcare 
un file mediante la freccia sinistra. 



PER POTENZIARE IL VOSTRO APPPLE II !!!!!! 


DRIVE 655 KB 


-Disponibili ora anche in Italia drive SIim 1 ine, meccanica Teac, con 
capacita' di 655 kb formattati. 

-Funzionanti con il normale controller APPLE in DOS 3.3 e anche in 
configurazione mista. 

-Disponibile CPM, Pascal e, prossimamente, Prodos. 

-possibilità' di selezionare 143 o 655 KB. 

ViaMora 2 zone 8 - Varese tei . 0332/238533 - 235475 



S.r.l. 
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Applesoft For The Ile 

di Brian D. Blackwood e George H. Blackwood. 
Scritto per l'Apple/Ze, presenta in 31 lezioni 
tutte le tecniche di programmazione, con 
esempi pratici, e programmi in 80 colonne. 

Sams. Lire 39.900. 

Abbonati ad Applicando 31.900. 



PolishingYour Apple 

di Herbert M. Honig, Vol.1 e Voi.2. Una guida 
pratica e maneggevole per archiviare su disco 
e suggerimenti per menù d’aspetto 
professionale, error-trapping, e routine. 

Sams. Lire 9.900 ciascun volume. 
Abbonati ad Applicando 7.900. 



Apple II Applications 

di Marvin L. De Jong. Una serie dì tecniche di 
interfacciamento che consentono di utilizzare 
un Apple// come sistema di sviluppo o di 
controllo, o rilevatore di misure. 

Sams. Lire 31.900. 

Abbonati ad Applicando 25.550. 





Apple// For Kids From 8 to 80 

di Michael Zabinski e Frank Mazzola. Un libro 
ricco di esercizi pratici, scritto con le tecniche 
con cui si insegna nei computer-camp 
americani, di cui Zabinski è stato il fondatore. 

Sams. Lire 21.900. 

Abbonati ad Applicando 17.520. 


Apple Graphics Activities Handbook 

di Harold J. Baileye J. Edward Kerlin. Tutte le 
tecniche di grafica bi e tridimensionale per 
Apple II e Apple//e. Con esempi ed esercizi. 

Prentice Hall. Lire 23.900. 

Abbonati ad Applicando 19.120. 


The VisiCalc Book Apple Edition 

di Donald H. Beil. Una guida pratica su come 
costruire un modello, inserire i dati, 
sperimentare il what if?, costruire proiezioni di 
profitti/perdite, stime costo/prezzo, ecc. 

Reston. Lire 38.900. 

Abbonati ad Applicando 31.120. 























Disk, Files, And Printers For The Apple// 

di Brian D. Blackwood e George H. Blackwood. 
Per imparare a realizzare text files e hard 
copies su carta. Tutto sui comandi per disk- 
drives e stampanti, con esempi pratici. 

Sams. Lire 31.900. 

Abbonati ad Applicando 25.520. 


5AM5 ' 

BASIC Tricks 
For The Apple 

AlUr WyoH 


APPLESOFT 

LANGUAGE 




The Academic Apple 

di Richard Mowe. Una guida per genitori e 
insegnanti, per aiutare i bambini dai 5 anni in 
su ad imparare meglio grazie ad un Apple//. 
Un’ottima introduzione all’uso del computer. 

Reston. Lire 18.000. 

Abbonati ad Applicando 14.400. 


Better Basic For The Apple 

di J.N.P. Hume e R.C. Holt. Tutto ciò che 
occorre per utilizzare con efficacia un Apple in 
ufficio o a casa è compreso in questo libro, 
ricco di programmi strutturati, facili da 
copiare. 

Reston. Lire 41.500. , 

Abbonati ad Applicando 33.200. 

I- 

i Inviatemi, senza aggravio di spese postali, 

[ i seguenti libri: 
i □ Applesoft For The Ile 
j □ PolishingYourApple 
i □ Apple II Applications 
i □ The Academic Apple 
J □ Disk, Files and Printers 
i □ Using Apple Business Comp. 
j □ Apple// For Kids From 8 to 80 
i □ Apple Graphics Activities 
i □ TheVisiCalc Book 
[ □ Better Basic For The Apple 
i n Basic tricks For The Apple 
[ □ Applesoft Language 


Cognome e nome. 

Via.N. 

Cap.Città.Provincia. 

□ Allego assegno non trasferibile di L.intestato a Editronica Srl. 

□ Allego ricevuta di versamento di L.sul CC postale N. 19740208 intestato a 

Editronica Srl, Corso Monforte 39,20122 Milano. 

□ Pago fin d’ora con la mia carta di credito Bankamericard N. 

scadenza . 

Data.Firma. 

□ Desidero fattura. Il mio C.Fisc./P.lvaè:. 

□ Desidero ricevere il catalogo completo dei libri disponibili. 

Ritagliare e spedire a : Editronica Srl, Corso Monforte 39,20122 Milano. 


Basic tricks For The Apple 

di Alien Wyatt. Ecco i trucchi che permettono 
ancora più efficienza. 35 routines per 
l’allineamento dei numeri, la gestione delle 
date e degli orari, la creazione di menù 
professionali, ecc. 

Sams. Lire 17.900. 

Abbonati ad Applicando 14.320. 


Applesoft Language 

di Brian D. Blackwood e George H. Blackwood. 
Sotto forma di lezioni (sono 29), questo 
manuale insegna il problem solving e il 
flowcharting, oltre ai comandi per la grafica e 
per il colore. 

Sams. Lire 27.900. 

Abbonati ad Applicando 22.320. 


Using Apple Business Computers 

di Kenniston W.Lord, Jr., CDP. Volete 
ammortizzare rapidamente l'investimento per il 
vostro Apple///? Questo libro spiega come 
usare con efficacia le procedure che rendono 
di più. 

VanNostrand. Lire 40.000. 

Abbonati ad Applicando 32.000. 
































































—) o <~ Spostare il Cursore §-K Definire un campo calcolato 

> § < Scambiare posizione dei campi l-N Cambiare il None/titolo prospett 

—> § <— Modificare ampiezza colonne §-0 Ordinare secondo questo campo 

§-E Eliminare questo campo S-P Cambiare i Parametri di stampa 

§-G Agg./togliere totali per Gruppi §-R Cambiare le Regole di selezione 

1-1 Inserire il campo cancellato prima §-S Stampare il prospetto 

§-J Giustificare a destra questo campo i-T Agg./Togliere Totali per campi 

Posiz Titolo Autore Editore Anno 

-A-B.C.D.E— 

H29 La Divina Commedia Dante Alighieri Mondadori 1956 

.Altri ~> 

Usa i seguenti comandi per modificare il formato 50K Disp. 


Figura IO 


Lavorando col Ile 

La campagna pubblicitaria Apple 
per il He è piuttosto veritiera quando 
dice che il nuovo Compatto è un uffi¬ 
cio completo che ci si può portar die¬ 
tro. A condizione però di disporre di 
Tre per te. Solo in questo caso infatti, 
con il peso aggiuntivo di qualche di¬ 
schetto, si avrà con sé Finterò archivio 
di lettere, relazioni, piani commercia¬ 
li, schedari, eccetera, e si potrà lavora¬ 
re anche in una stanza d’albergo usan¬ 
do come monitor il televisore. 

Nella forma più portatile, e cioè 
senza drive aggiuntivo, il //c presenta 
però qualche scomodità nell’uso di Tre 
per te. Si tratta di scomodità tollerabi¬ 
li, comunque, e che riguardano so¬ 
prattutto le fasi iniziali e finali del la¬ 
voro. Cioè i momenti in cui si deve 
prelevare o conservare qualche file. Si 
dovrà infatti, sempre guidati dal com¬ 
puter, scambiare dischetto quattro o 
cinque volte, passando dal disco pro¬ 
gramma al disco dati. 

In ogni caso, chi usa abitualmente 
due drive e occasionalmente inserisce 
il programma in un sistema a un solo 
drive (o viceversa), dovrà passare dal¬ 
l’opzione «Altre attività», prevista nel 
Menù Base. Dovrà infatti precisare in 
quale drive verrà inserito il disco dati, 
se nel primo o nel secondo. 

Collegando il ProFile 

Il submenù di «Altre attività» com¬ 
prende inoltre la possibilità di cambia¬ 
re il prefisso corrente del dischetto 


ProDos, di listare l’elenco completo 
dei file presenti sul dischetto, di creare 
una subdirectory, di cancellare file dal 
disco, di formattare un dischetto ver¬ 
gine, e di specificare informazioni sul¬ 
la stampante. Anzi, sulle stampanti, 
perché il programma è predisposto per 
supportarne fino a tre contempora¬ 
neamente, lasciando all’utente la scel¬ 
ta di quale usare. 

La possibilità di cambiare prefisso 
ProDos è una novità per chi non ha 


avuto ancora modo di usare questo 
nuovo sistema operativo. Ma sottin¬ 
tende l’altra novità non ancora accen¬ 
nata: che cioè Tre per te può anche 
essere usato utilizzando per i dati non 
un normale dischetto ma un ProFile da 
5 Mega, allargando quindi enorme¬ 
mente le possibilità di immagazzinare 
dati in archivio. La limitazione che re¬ 
sta è quella legata alla dimensione di 
ciascun file, visto che il programma 
lavora in memoria, e quindi, conside- 


Figura 11 

A-B Una o più celle Bianche 

RETURN 

Accetta 

A-C 

Cerca coordinate informazioni 

Frecce 

Spostano il cursore 

A-B 

Duplica (copia) valori (incluso taglia e incolla) 

TAB e A-TAB 

Spostano il cursore 

A-E 

Elimina (cancella) righe o colonne 

A-Frecce 

Spostano di una pagina video 

A-F 

Mette/toglie Finestre video 

0-9 + - . 

Per inserire un valore 

A-l 

Inserisce riga o colonna 

1 o lettere 

Per inserire una label 

A-J 

Salta ad un'altra finestra 

A-l 

Va a inizio File 

A-K 

A-L 

Calcola tutti i valori 

Cambia Layout (attributi) alle celle 

tino a 

A-9 

Va a Fine File 

A-M 

A-N 

Muove le celle (incluso taglia e incolla) 

Cambia Nome al file 

Valori standard attuaii 

A-0 

A-P 

Ordina una colonna 

Parametri di stampa 

Protezione 

Sì 

A-S 

Stampa 

Formato Label 

Giust. sinistra 

A-T 

Mette/toglie Titoli fissi 

Formato Valori 

Appropriato 

A-U 

Corregge il contenuto di una cella 

Frequenza 

Automatico 

A-V 

Mette Valori e regole standard 

Ordine 

Colonne 

A-Z 

Zoom sulle formule, o 

Zoom sui valori 
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rata la dimensione del programma 
stesso, nessun file potrà occupare più 
di 51Kbyte. Tuttavia l’uso del ProFile 
diminuisce ulteriormente, o addirittu¬ 
ra elimina del tutto, la necessità di 
cambiare dischetto dati. 

Come usare il programma 

Riunendo in sé le tre più usate fun¬ 
zioni professionali per cui solitamente 
si acquista un computer, Tre per te 
potrebbe benissimo essere l’unico pro¬ 
gramma di un professionista, di un im¬ 
prenditore, di un manager. A guardar 


bene, sul piano delle applicazioni utili 
per il lavoro, con questo pacchetto è 
possibile praticamente far di tutto, e 
starà poi al singolo utente individuare 
le migliori applicazioni possibili. Per 
esempio le capacità di calcolo (sia pure 
limitate) del data-base, consentono 
anche di impostare un minisistema di 
fatturazione che per le esigenze meno 
sofisticate andrà benissimo, calcolan¬ 
do pure Piva e i totali. 

Applicazioni di questo tipo sono 
possibili grazie a una particolarità del 
data-base. Si possono infatti predi- 


: i)e : Prova spread 

-- A..D- 

- -r— 

REV/AGG/MODIFICA 

- (f - 

1! 

2!Carabio Dollaro 

3'Ricarico - 

4! 

5! 

->1680 
—>20 

Dollari 

Lire 

ófProdotto Ccc 

42 

<C2*C6H<C2*C6/1Q0*C3) 

7!Prodotto Aaa 

345 

(C2*C7)♦(C2*C7/100*C3) 

8!Prodotto Eee 

700 

<C2*C8)*(C2*C8/1Q0*C3) 

9!Prodotto FH 

3070 

<C2*C9)*(C2*C9/100»C3) 

10!Prodotto Ddd 

5670 

<C2*C10)+<C2*C10/100*C3) 

11!Prodotto Bbb 

7890 

(C2*C11 ) ♦ < C2*C11/100*C3) 


Figura 14 

sporre e memorizzare diversi prospetti 
di stampa dei dati, partendo dalla stes¬ 
sa base e richiamando poi l’uno o l’al¬ 
tro secondo necessità. Per esempio 
uno schedario clienti ben organizzato 
può trasformarsi al momento della 
stampa in una rubrica telefonica, in 
una raccolta di estratti conto, in eti¬ 
chette per spedizioni postali, in 
fatture. 

Si procede così. Predisposto lo sche¬ 
dario base in modo che contenga tutti i 
dati necessari (ma si può sempre modi¬ 
ficare la struttura del file senza per 
questo perdere i dati già inseriti), nel 
momento in cui si decide di ricavarne 
una rubrica telefonica si predisporrà la 
stampa in modo che compaiono solo 
nomi, cognomi e numeri telefonici. A 
questo prospetto Tre per te chiede di 
dare un nome, per esempio Rubrica, e 
lo memorizza. La prossima volta che si 
chiederà di procedere a una stampa, il 
computer vorrà sapere se si intende 
utilizzare il prospetto Rubrica, o se si 
desidera crearne un’altro. 

Così se si prepara un data-base delle 
proprie spese, e lo si chiamerà Nota- 
spese, per predisporre mensilmente il 
proprio rendiconto basterà chiedere di 
stampare il prospetto Notaspese: pen¬ 
serà il computer a raggruppare le spe¬ 
se per giorno ed eventualmente per 
viaggio, a ordinarle cronologicamen¬ 
te, a fare i totali, e a stampare il tutto. 

Ma se le capacità di calcolo del data¬ 
base sono limitate, non è così natural¬ 
mente per quelle dello spreadsheet. 

Così, con un po’ di pratica, Tre per 
te (che viene venduto a 420 mila lire) 
finisce con diventare il programma che 
si tiene sempre inserito nel drive, men¬ 
tre il computer si accende al mattino 
per spegnerlo solo a fine giornata. 

Cessata la necessità di cambiar di¬ 
schetti e riavviare ogni volta il pro¬ 
gramma, visto che si può passare facil¬ 
mente da una funzione all’altra, l’Ap¬ 
ple comincia davvero a mostrare tutta 
la sua utilità come strumento di lavoro 
quotidiano. ■ 
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C come compatto, c come completo, c come compatibile, 
ma anche portatile, leggero, versatile. 

Il nuovo piccolo personal di Steve Jobs offre in dimensioni limitate 
tutte le prestazioni di un //e con addirittura qualcosa in più 


Mela 

da passeggio 


A i giornalisti specializzati è stato 
presentato a Milano in una riu¬ 
nione formale al circolo della stampa. 
Per gli operatori è stata organizzata 
una grandiosa festa all’hotel Cavalieri 
Hilton di Roma, con più di 700 invita¬ 
ti, la regia di Gianni Boncompagni, la 
partecipazione del mago Alexander, 
del comico Lino Banfi, della compu¬ 
ter-singer Doris Norton. Il grande 
pubblico l'ha potuto ammirare per la 
prima volta (qualcuno, più fortunato, 
addirittura di metterci un dito sopra), 
alle mostre specializzate di Romauffi- 
cio e Bit Usa di Milano. Così Apple //c 
ha fatto il suo ingresso sul mercato 
italiano. Anche se tutto era stato fatto 
in gran segreto, gli addetti ai lavori 
avevano fiutato che in casa Apple sta¬ 
va succedendo qualcosa. 

Nessuno capiva però con precisione 
che cosa la mente di Steve Jobs avesse 
messo in cantiere. Le ipotesi che circo¬ 
lavano erano essenzialmente due. La 
prima dava per imminente il lancio di 
un home computer. La seconda la 
commercializzazione di una macchina 
che sostituisse Apple //e. E nessuno 
aveva preso in considerazione il lancio 
di un portatile che per di più racchiu¬ 
desse al suo interno le caratteristiche 
del //e. Gli esperti giudicavano saturo 
il settore dei portatili per la casa di 
Cupertino perché soltanto nei primi 
mesi di quest’anno era stato presenta¬ 
to, e con successo, Macintosh. Non 
hanno tenuto conto di un importante 
fattore: per Steve Jobs il Macintosh 
rappresenta la filosofia del personal 
trasportabile, non di quello portatile. 

Ha detto ad Applicando Ciro Asca¬ 
ri, direttore generale della Apple Ita¬ 
lia: «Con Apple Ile finalmente all’u¬ 
tente non resta che collegare il compu¬ 
ter alla rete e al video e». 

Viene forse decretata la fine del //e? 
«Assolutamente no», risponde Asca¬ 
ri. «Il //c è una macchina che va ad 
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affiancarsi al //e, non a sostituirla. Il //c 
non è infatti in grado di consentire 
l’uso delle espansioni, fatto che rima¬ 
ne una prerogative del //e». Nella sua 
compattezza e semplicità (misura 30 
centimetri di lunghezza per 29 di lar¬ 
ghezza e per 6 di altezza), il //c racco¬ 
glie tutte le caratteristiche che lo ren¬ 
dono completamente compatibile con 
il fratello maggiore d’età //e. Anzi, 
qualcosa in più. Prodotto nelle fabbri¬ 
che di Dallas (Usa) e di Cork (Irlan¬ 
da), ecco cosa offre: • 128Kbyte di 
memoria Ram; • 16Kbyte di memoria 
Rom; • visualizzazione su 40 o 80 co¬ 
lonne (selezionabili); • due porte se¬ 
riali per stampante o modem; • tastie¬ 
ra professionale italiana; • 1 drive in¬ 
corporato per floppy disk da 5,1/4”; • 
connettore per un secondo drive ester¬ 
no; • connettore per Mouse, Joystick 
o Paddles; • grafica a colori con due 
livelli di alta risoluzione; • altoparlan¬ 
te con volume regolabile e presa per 
cuffia; • maniglia incorporata a scom¬ 
parsa. 

Il Ile utilizza il nuovo microproces¬ 
sore 65C02 (è questa l’unica differenza 
con il //e che non incide però sulla 
totale compatibilità), e dispone degli 
ormai ultranoti sistemi operativi Dos 
3.3 e ProDos che lo fanno parlare nei 
linguaggi Applesoft Basic, Pascal, 


Fortran, Logo e Assembler 65C02. La 
tastiera è stata ridisegnata per miglio¬ 
rare la leggibilità dei caratteri e ha un 
aspetto e una funzionalità professio¬ 
nali. Unica differenza con quella del 
//e è la collocazione del tasto reset a 
sinistra e la possibilità di selezionare 
con un solo dito le 40 o le 80 colonne. I 
tasti (63 con 94 caratteri) sono disposti 


secondo lo standard italiano delle 
macchine da scrivere (qzerty), pur 
mettendo a disposizione l’insieme dei 
caratteri americani, indispensabili 
quando si vuole battere un listato. 

Il drive, incorporato (il floppy disk 
si introduce in una fessura sul lato de¬ 
stro della macchina), ha capacità di 
143 Kilobyte, l’equivalente di 36 pagi- 









■■■■■■ 


■■ 


ne di testo A4 con spaziatura singola. 
Capacità che può naturalmente essere 
raddoppiata aggiungendo un drive 
esterno. Per il He è attualmente dispo¬ 
nibile un monitor da 9 pollici (24 righe 
per 40 o 80 colonne); da settembre per 
Apple He verrà commercializzato un 
display ultrapiatto, a cristalli liquidi, 
da 40 colonne. Il nuovo schermo pese¬ 
rà meno di 1,2 kg e non richiederà 
alimentazione separata. Il prezzo di 
vendita del nuovo visore Lcd per ora 
non è stato neppure accennato, sem¬ 
bra però che non potrà essere inferiore 
al milione di lire. 

Per la grafica sono previste tre di¬ 
verse opzioni: a bassa risoluzione, 
40x80 pixel, 16 colori; ad alta risolu¬ 
zione. 280x192 pixel; e ad altissima 
risoluzione, 560x192 pixel. 16 colori. 
Appi e Ile può anche essere collegato a 
un comune televisore a colori. I meno 
esperti in hardware saranno felici di 
sapere che sul retro di Ile sono situati 
tutti i connettori indispensabili per 
collegare semplicemente a innesto e 
dall'esterno le unità periferiche com¬ 
patibili (si evita in questo modo di do¬ 
ver trafficare alPinterno della macchi¬ 
na tra i vari slot e le schede d’espansio¬ 
ne). A disposizione ci sono le prese 
per: il mouse, il joystick e le paddles, il 
modem, il visore a pannello piatto, il 
televisore o il monitor, le stampanti e 
il plotter a colori, il drive esterno e, 
naturalmente, l'alimentazione. A 
questo proposito è opportuno precisa¬ 
re che Ile da vero portatile è in grado di 
funzionare con 9/10.volt che possono 
essere forniti da comuni batterie in se¬ 
rie. Pare anche risolto l'annoso pro- 




Mouse, 
Joystick 
e Manopole 


Modem 


Visore a 
pannello piatto, 
televisore 
e monitor 
a colori RGB 


Monitor 


Drive 

esterno 


Stampanti 
e plotter 
a colori 


Alimen- Inter- 
tatore ruttore 
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blema delle stampanti. A disposizione 
ci sono il modello Scribe (in grado di 
riprodurre sia testi sia grafici e che, 
nonostante il sistema di stampa termi¬ 
co, non abbisogna di carta speciale), e 
la Image Writer (una stampante ad 
aghi a grande velocità con 120 caratte¬ 
ri al secondo e una grafica ad alta riso¬ 
luzione: 160x144 punti per pollice qua¬ 
drato). Per i più esigenti in fatto di 
grafica c’è il plotter a colori. 

Per il software il problema sta solo 
nella scelta. Infatti su //c gira tutto 
quello realizzato per //e (secondo le 
stime della casa di Cupertino sono più 
di 20 mila le applicazioni oggi in com¬ 
mercio). Pare però che ci sia già una 
decisa concorrenza tra le più famose 
società di software (comprese alcune 
case italiane che finalmente non agi¬ 
scono più timidamente sul mercato), 
per creare o riscrivere per prime pro¬ 
grammi in grado di sfruttare appieno 
le potenzialità del Ile: soprattutto la 
grafica ad altissima risoluzione. I risul¬ 
tati di questo antagonismo si possono 
già vedere. Tra i nuovi programmi 
messi a disposizione dell’utente ci so¬ 
no Applework o Tre per Te (vedere il 
servizio a pag. 12), un programma in 
multitask che unisce in un unico .disco 
un word processor, un data base e un 
foglio elettronico. Access II , che tra¬ 
sforma Apple Ile in un terminal intelli¬ 
gente per la trasmissione e la ricezione 
dei dati. Mousepaint, che adatta il pro¬ 
gramma di grafica Macpaint, studiato 
per il Macintosh, sul Ile. Cfs , un data 
base della Cominform di Torino, che è 
stato rivisto e migliorato consentendo¬ 
ne l’utilizzo anche con il mouse. 

Il prezzo di vendita di Apple Ile è 
stato fissato in 2,4 milioni di lire, Iva 
esclusa, e comprende i manuali e i re¬ 
lativi programmi. 

Mario Magnani e Alberto Rossi 
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Titoli di stato, cartelle fondiarie, obbligazioni 
nazionali, internazionali, per il credito industriale e per 
il finanziamento delle opere pubbliche possono costituire un valido 
sistema per difendere i propri risparmi. 

Importante è avere un quadro completo e concreto dei rendimenti. 

E con questo programma... 

Tasso fisso 
un po’ variabile 


C i sono innumerevoli sistemi per in¬ 
vestire i propri risparmi, dai titoli 
azionari alle gestioni patrimoniali, 
dall’acquisto di immobili, di franco¬ 
bolli, di quadri, a quello di Bot, o di 
vari certificati: patrimoniali, mobilia¬ 
ri, immobiliari. C’è anche chi tenta 
sistemi alternativi, come l’allevamen¬ 
to dei lombrichi, funghi, lumache. 
Buone soddisfazioni possono derivare 
dall’acquisto di obbligazioni. Il segre¬ 
to per far buoni affari è, anche in que¬ 
sto caso, quello di poter avere un qua¬ 
dro il più preciso possibile dei vari ren¬ 
dimenti, e questo perché, nonostante 
il reddito di questi titoli venga chiama¬ 
to fisso, fisso non lo è davvero per 
niente. Mettiamo il caso che abbiate 
ereditato un modesto gruzzolo e che 
decidiate di investirlo in obbligazioni. 
La prima cosa che fate è andare in 
banca per farvi indicare quali titoli fa¬ 
rebbero fruttare al massimo il vostro 
denaro. Dopo un paio di domande di 
carattere finanziario, l’impiegato vi 
propone due differenti obbligazioni, 
una con un tasso d’interesse nominale 
dell’11%, l’altra del 6%. Prima di trar¬ 
re la conclusione che il bancario da voi 
interpellato sia pronto per la camicia 
di forza, andate avanti nella lettura. 

Tutte le obbligazioni infatti hanno 
un valore nominale (o facciale) che 
rappresenta la somma che remittente 
pagherà a una data prefissata, detta 
scadenza dell’obbligazione. Tutte le 
obbligazioni hanno inoltre un tasso 
d’interesse nominale, cioè l’interesse 
che 1’emittente pagherà periodica¬ 
mente, di solito ogni sei mesi, fino alla 
scadenza dell’obbligazione. Quindi 
un’obbligazione che abbia valore no¬ 
minale di 100 lire e un tasso d’interesse 
del 10% pagherà 10 lire all’anno come 


interesse sull’obbligazione. 

Tuttavia, le obbligazioni non vengo¬ 
no praticamente mai vendute al valore 
nominale, bensì a un prezzo d’acqui¬ 
sto inferiore. Perciò se si acquistano 
obbligazioni da 100 lire pagandole 90 
lire, 1’emittente pagherà lo stesso il 
10% sul valore nominale, e l’interesse 
annuo effettivo salirà allTl%, cioè 10 
lire all’anno sull’investimento di 90 li¬ 
re. Il guadagno effettivo é però mag¬ 


giore, perché alla scadenza 1’emittente 
pagherà 100 lire per le 90 che saranno 
state inizialmente investite. Il guada¬ 
gno preciso dipenderà anche dalla sca¬ 
denza delle obbligazioni. 

L’attuale tasso d’interesse e il rendi¬ 
mento complessivo dell’obbligazione 
sono chiamati rendimento immediato 
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e rendimento alla scadenza, e sono da¬ 
ti facilmente reperibili sulle pubblica¬ 
zioni finanziarie. Sfortunatamente le 
obbligazioni, essendo trattate nei mer¬ 
cati finanziari liberamente, hanno 
fluttuazioni delle quotazioni in alcuni 
casi notevoli: per esempio ci sono ob¬ 
bligazioni commercializzate intorno 
alle 50 lire che hanno tassi di interesse 
tra il 5 e il 6%. Ne consegue che chi 
investe in questi titoli 100 lire avrà un 
reddito immediato del 10-12% mentre 
il rendimento alla scadenza potrà sali¬ 
re anche al 15%. 

C’è poi un’altro fattore che intervie¬ 
ne a complicare le cose quando si cerca 
di valutare il reale rendimento di 
un’obbligazione, le tasse. Gli interessi 
che provengono da molte obbligazioni 
sono tassati direttamente alla fonte 
con una ritenuta secca del 10,80%. Al¬ 
tri titoli invece, come Bot e Cct, sono 
completamente esentasse. Visto che il 
contributo al fisco viene effettuato di¬ 
rettamente alla fonte, non sussiste 
l’obbligo di denunciare questo tipo di 
entrate nella dichiarazione dei redditi. 
Inoltre, ogni differenza tra il valore 
nominale e il prezzo d’acquisto si tra¬ 
sforma in un guadagno di capitale, che 
non è soggetto ad alcuna tassazione. 

Così, la percentuale di rendimento 
dell’investimento non solo è difficile 
da calcolare, ma varia in ragione di 
diversi fattori. Il programma di queste 
pagine è in grado non solo di calcolare 
il rendimento immediato delì’obbliga- 
zione ma anche il guadagno di capita¬ 
le; inoltre il programma usa i valori 
calcolati per determinare sia il rendi¬ 
mento totale che quello effettivo al 
netto di tasse. 

La configurazione 
richiesta 

«Bond Manager», così è stato bat¬ 
tezzato il programma per calcolare il 
rendimento delle obbligazioni o dei ti¬ 
toli di stato, richiede l’Applesoft in 
Rom, un drive e almeno 32K di Ram. 
La stampante è opzionale, ma è ovvia- 


1 REM ********************** 

2 REM * BOND MANAGER * 

3 REM * BY DOUG SPRINKLE * 

4 REM * C0PYRI6HT (0 1982 * 

5 REM * BY APPLICANDO * 

6 REM * & M1CR0-SPARC INC * 

7 REM * LINCOLN, 01773 * 

8 REM **«##**«##***#****** 

10 TEXT s HOME : SPEED= 255 
100 GOTO 11000 

130 REM QUESTA ROUTINE CONVERTE 
I NUMERI IN FORM XX .XX 
180 W = INT <W * TT) 

190 TI = STRI (W)iSL = LEN (TI 
) -N2 

200 IF SL < P5 THEN TI = ZZI 4 T 
l:SL s SL ♦ N2 

210 W* = LEFTI <TI,SL) 4 PEI 4 
R1GHTI <TI,N2) 

220 RETURN 

1000 REM INIZIO DELL'ORDINAMENT 
0 

1030 FOR SN = NI T0 I 

1040 HX = SN: REM INDICE MSSIM0 

1050 T = X(A,SN) 

1060 FOR SF = SN T0 I 
1070 IF X<A,SF) < T THEN 1090 
1080 T = X(A,SF):MX = SF 
1090 NEXT SF 

1100 IF MX = SN THB* 1220 
1110 REM 

1120 REM SLITTAMENTO DEI CAMPI 
1130 REM 

1140 FOR SU = NO TONO 
1150 T = X<SU,SN) 

1160 X(SU,SN) = X(SU,MX) 

1170 X(SW,MX) = T 
1180 NEXT SU 
1190 TI = BNNSN) 

1200 BNKSN) = BNI(NX) 

1210 BN$(MX) = TI 
1220 NEXT SN 
1230 RETURN 

1250 REM ORDINAMENTO ALFABETICO 

1270 FOR SN = NI TO I 
1280 MX = SN:TI = BNKSN) 

1290 FOR SF = SN TO I 

1300 IF BNKSF) > TI THEN 1320 

1310 TI = BNKSF) :MX = SF 

1320 NEXT SF 

1330 GOTO 1100 

2000 REM 

2010 REM 

2020 REM QUESTA ROUTINE CMCELL 

A I RECORD 
2030 REM 

2040 CALL - 936: VTAB TU: HTAB 
12: FLASH : PRINT 'STO CMCE 
LLANDO 1 : N0RMAL 
2050 IF I > P5 THEN 2070 
2060 POP : RETURN 
2070 FOR MK = NI T0 I 


2080 IF BNKMK) < > ASI THEN 21 
70 

2090 FOR M = MK TO I 
2100 X = M 4 NI 
2110 FOR m = NO T0 NQ 
2120 Xttfl,M) = X<W,X) 

2130 NEXT m 
2140 BN$(M) = BNKX) 

2150 NEXT M 
2160 I = I - NI 
2170 NEXT MK 
2180 DL = NO 
2190 RETURN 

3010 REM CALCOLA I WL0RI 
3030 IF DT < P5 THEN GOSUB 4000 
3040 IF DI < P5 THEN 3070 . 

3050 JJ = I : CALL - 936: VTAB TU 
: HTAB 15: FLASH : PRINT ’AT 
TENDERE': NORMAL 
3060 FOR L = BR TO JJ 
3065 TR = X(11,L) 

3070 X(N6,L) = X(N2,L) / HU 
3080 MO = (X(N3,L) - CY) « TU 4 X 
(N4,L) - CM 

3090 X(N8,L) = «X(N1,L) - X(N0,L 
)) / X(N0,L)) / <M0 / TU) 

3100 X<N9,L) = (X<N1,L) / X(N0,L) 

) * X(N6,L) 

3110 X(N7,L) = X(N9,L) 4 X(N8,L) 

3140 X(NQ,L) = X<N9,L) * <1 - TR) 

4 X(N8,L) 

3150 IF DI < P5 IWBi RETURN 
3160 NEXT L 
3170 RETURN 

4000 CALL - 936: VTAB TU 
4010 PRINT ' INSERIRE LA DATA D 
I OGGI': PRINT 

4020 PRINT ' PER Gl ORNO, MESE ,AN 
NO': PRINT : INPUT ' <P.ES. 
3,11,1981) a ;CD,CM,CY 
4030 PRINT : PRINT : HTAB TU: PRINT 
CD;" ';M0$(CM)j' - ;CY 
4040 PRINT : PRINT : PRINT TAB< 

12)'GIUSTO <S/N)?*; 

4050 6ET M : IF Al = NLI THEN 40 
50 

4060 IF LEFTI <AI,N1) < > SI THEN 
4000 

4070 CM = CM 4 CD / F30 
4080 CALL - 936 
4090 PRINT : PRINT 
4120 DT = NI: CALL - 936: FLASH 
: VTAB TU: HTAB 16: PRINT 'A 
TTENDERE': NORMAL : RETURN 
4130 RETURN 

5020 REM ROUTINE DI INSERIMENTO 
5030 REM DEI DATI DA TASTIERA 
5060 CALL - 936: JX = I 4 NI 
5070 FOR I = JX TO HH 
5080 CALL - 936 
5090 INPUT ' OBBLIGAZIONE 
'jBNI(I): PRINT 
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Figurai. 

Il menu 
principale. 


*#* MENU ##* 

1 - INSERIMENTO DATI DA TASTIERA 

2 - CARICAMENTO DATI DA DISCO 

3 - REGISTRAZIONE DATI SU DISCO 

4 - VISUALIZZAZIONE/CORREZIONE DATI 
3 - STAMPA DEI RISULTATI 

6 - ORDINAMENTO 

7 - FINE 

SCELTA OPZIONE NUMERO 


5100 BNI(l) s LEFTI <BNI<I),N7) 

5110 INPUT ■ PRE220 D'ACQUISÌ 
0 LIRE ';A$:T= WL (Al) 

: JF T < P5 THEN HTAB NI ; MTAB 
N2: PRINT Gl: GOTO 5110 
5120 PRINT :X(N0,J) « T 
5130 INPUT • MALORE NOMINALE 

LIRE ';A$:T* WL (Al) 
s IF T < P5 THEN HTAB NI: MTAB 
N4: PRINT Gl: 6OT0 5130 
5140 PRINT :X(N1,I) = T 
5150 INPUT 1 TASSO DTNTERESS 
E <X) " ;AlsT = MAL (Al) 

: IF T < P5 THEN HTAB NI: MTAB 
Né: PRINT Gl: GOTO 5150 
51éO X(N2,1) = T: PRINT 
5170 INPUT a DATA DI SCADEN2A 

(ME.610) 1 jAI:A = MAL (Al) 

5180 IF A = ) NU OR A < NI THEN 
PRINT Gl: HTAB NI: MTAB N9: 

GOTO 5170 

5190 T = HU * (A - 1NT (A)): IF 
T > ND THBI PRINT Gl: HTAB 
NI: MTAB N9: GOTO 5170 
5200 X(N4,I) = TD * (A - INT (A) 

) 4 INT (A): IF X(N4,I) = WL 
(Al) THEN X(N4,I) = X(N4 f I) ♦ 

TD / HU 
5210 PRINT 

5220 INPUT " AWO DI SCADENZA 
(ES 1982)" ;AlsT s WL (Al) 

: IFT < P5THEN HTAB NI: VTAB 
NQ: PRINT Gl: GOTO 5220 
5230 IF LEN (Al) < ) N4 THEN PRINT 
Gl: HTAB NI: VTAB 11: GOTO 5 
220 

5240 X(N3,I) = T 

5250 PRINT : PRINT 

5251 PRINT : INPUT 1 RITENUTA 

<S/N) ';AI: IF A 

I = "N B THEN TR = 0: GOTO 52 
54 

5252 IF Al = 'S' THEN TR = 0.108 
0 

5253 IF Al < ) SI THEN HTAB NI 
: VTAB 13: PRINT Gl: GOTO 52 
51 

5254 X(11,I) * TR 
5260 PRINT : PRINT 
5270 CC * IiL > CC 
5280 60SU8 10000 

5290 IF NS = NI THEN NS = NO: GOSUB 
3030: RETURN 

5300 IF NS = N2 THEN NS = NO: CALL 

- 936: 6UT0 5090 

5310 IF NS = N4 TH04 NS = NO: CALL 

- 936: 60SUB 3030: GOTO 540 

0 

5320 POKE 33,10: POKE 32,30: MTAB 
NI: HTAB 35: POKE 35,18: REM 
PREPARA LA FINESTRA 

5330 CALL - 936: PRINT BNI(I): PRINT 


mente indispensabile per far girare la 
routine di stampa su carta. Per lancia¬ 
re il programma è sufficiente imposta¬ 
re RUN BOND MANAGER, senza 
ulteriori procedure particolari. 

Come funziona 
il programma 

Il menù principale di «Bond Mana¬ 
ger» (vedi Figura 1), che parte dalla 
riga 11230, indirizza a sette opzioni. 
L’utente deve impostare il numero da 
1 a 7, che corrisponde alla sua scelta. 
Ogni altro carattere sarà ignorato e 
accompagnato da un beep dell’Apple 
per avvisarvi dell’errore. Ecco in det¬ 
taglio le diverse opzioni. 

Inserimento dei dati 

La scelta della prima n.l permette 
all’utente di inserire da tastiera i dati 
dell’obbligazione; successivamente il 
controllo del programma viene passa¬ 
to alla riga 5060. All’inizio il program¬ 
ma chiede il nome dell’obbligazione. 
Si può inserire una qualunque stringa 
alfanumerica, per esempio Bot, ma 
solamente i primi 7 caratteri sono si¬ 
gnificativi. Questo significa che se si 
introduce Mediobanca 79 89 11% solo 
Medioba, cioè le prime 7 lettere, ven¬ 
gono memorizzate. Come secondo in¬ 
put, il programma richiede il prezzo 
d’acquisto, cioè la cifra effettivamente 
spesa per l’acquisizione (o per la simu¬ 
lazione) dell’obbligazione. Verrà ac¬ 
cettato un qualunque valore superiore 
a 0.5, altrimenti l’Apple emetterà un 
beep e il prezzo d’acquisto dovrà esse¬ 
re inserito nuovamente. 

Poi, l’utente deve inserire il valore 
nominale dell’obbligazione, cioè l’am¬ 
montare che 1’emittente pagherà alla 
scadenza del titolo. Il valore nominale 


dei titoli obbligazionari è solitamente 
rapportato alle cento lire, con un ta¬ 
glio minimo d’acquisto che varia a se¬ 
conda del titolo stesso. Quindi bisogna 
fornire il tasso d’interesse dell’obbli- 
gazione (in percentuale). È accettabi¬ 
le solo un valore superiore a 0.5, visto 
che tutte le obbligazioni attualmente 
trattate pagano più dello 0.5%. 

Ora il programma chiede la data di 
scadenza, che deve essere data nella 
forma MESE.GIORNO. Quindi il 7 
di febbraio si scrive 2.07, e il 2 di feb¬ 
braio diventa 2.02 (2.2 verrebbe inter¬ 
pretato come 20 di febbraio). È rifiu¬ 
tato qualunque valore maggiore di 12 
per il mese e maggiore di 31 per il 
giorno, ma non c’è alcun controllo sul¬ 
la congruenza della data. Sarebbe ac¬ 
cettato anche un 31 febbraio. All’atto 
pratico questo ha poche conseguenze 
sul calcolo. Se si specifica solo il mese 
«Bond Manager» assume come giorno 
di scadenza il primo. Subito dopo vie¬ 
ne chiesto l’anno di scadenza, di cui 
debbono essere date tutte e quattro le 
cifre. Infine il programma vuole sape¬ 
re se sul titolo viene applicata la rite¬ 
nuta, cioè se dagli interessi verrà de¬ 
tratta la percentuale del 10,80%. 

Una volta completato l’inserimento 
dei dati del titolo, sono a disposizione 
dell’utente quattro comandi, che com¬ 
paiono nell’angolo inferiore destro 
dello schermo. Impostando la lettera 
«R» si ritorna al menù principale, con 
la lettera «C» si cancella il record ap¬ 
pena inserito, mentre col tasto di RE¬ 
TURN si passa al record successivo, in 
cui si inseriranno i dati di un’altra ob¬ 
bligazione. Sia quando si ritorna al 
menù che quando si passa al record 
successivo viene eseguita la subrouti¬ 
ne alla riga 3000, che effettua i calcoli 
sui valori dell’obbligazione. 

La prima volta che questa routine 
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viene eseguita, il programma chiede 
l’introduzione della data attuale. Pre¬ 
mendo il tasto della «M», invece, vie¬ 
ne chiamata la routine della riga 
10250, che permette la modifica dei 
dati dopo che sono stati inseriti. In una 
finestra sul lato sinistro dello schermo 
appaiono i numeri da 1 a 7, allineati 
con i dati precedentemente forniti. 
Ciascun numero indica un «campo». 
La routine di modifica crea inoltre, 
per mezzo dei comandi della linea 
10380, un’altra piccola finestra nel¬ 
l’angolo inferiore sinistro dello scher¬ 
mo, all’interno della quale compare la 
richiesta di specificare il campo che si 
desidera modificare, e quella di inseri¬ 
re il nuovo valore, che verrà sostituito 
a quello precedente anche nella fine¬ 
stra principale non appena premuto il 
tasto di ritorno. 

Caricamento dati da disco 

L’opzione n.2 del menù principale 
permette di caricare dal disco dati pre¬ 
cedentemente registrati e di aggiun¬ 
gerli o sostituirli a quelli eventualmen¬ 
te già presenti in memoria. Da questa 
routine, che parte dalla riga 14000, si 
può tornare al menù principale impo¬ 
stando la lettera «M». Con la lettera 
«C», invece, è possibile avere il cata- 
log, cioè la lista dei file presenti sul 
disco. Qualunque altro carattere di¬ 
verso da «C» e da «M» sarà interpreta¬ 
to come un identificatore del file da 
caricare. Più precisamente questo ca¬ 
rattere è quello che segue il nome ge¬ 
nerico dei file BONDDATA. Questo 
identificatore finale ha due scopi: per¬ 
mette di immagazzinare assieme più 
file di dati, visto che la capacità di 
memoria dell’Apple è limitata, e con¬ 
sente di registrare i file separatamente 
catalogandoli secondo le caratteristi¬ 
che delle obbligazioni. 

Registrazione 
dei dati su disco 

Con l’opzione n.3 si possono salvare 
in un file su disco i dati in memoria. La 
routine che inizia alla riga 15000 ri¬ 
chiede che l’utente specifichi un singo¬ 
lo carattere identificatore di file, che è 
aggiunto al nome del file BONDDA¬ 
TA. I dati in memoria non vengono 
cancellati dopo la registrazione. 

Visualizzazione 
e correzione dei dati 

La routine che comincia alla riga 
6000, mostra non solo i dati preceden¬ 
temente inseriti ma anche i valori, cal¬ 
colati, degli apporti delle obbligazio- 
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Macintosh: un piccolo gioiello. E Applicando lo regala. A 
chi? A uno dei suoi abbonati. Come fare per vincerlo? 
Basta abbonarsi o rinnovare l’abbonamento: il Mac 
messo in palio da Applicando sarà estratto a sorte tra tutti 
coloro che risulteranno abbonati alla data del 30 giugno 
1984. Un motivo in più per abbonarsi o rinnovare subito 
l’abbonamento alla rivista di chi applica. 
E scegliendo Applicando più le prossime due edizioni 
delle Pagine del Software, si risparmiano 14 mila lire. 
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tu apP ,'Usuino', 
abbona" sUD 


gratis, se ti abboni subito! 

Un dischetto con tre utilissimi superprogrammi e la 
Facility Card Applicarci che, fra gli altri vantaggi, 
darà diritto a sconti su programmi che verranno 
offerti da Applicando. Compila e spedisci 
subito questo tagliando a: 

Editronica, C.so Monforte 39, 

20122 Milano. 
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i Sì, mi abbono! 


è bimestrale. 
Per applicare con noi 
abbonati inviando il 
coupon a 
Editronica s.r.l., 

C.so Monforte 39, 
20122 Milano. 

Oppure acquistalo: 
nei migliori 
Computer Shop. 


applicarci 


□ Inviatemi sei numeri di Applicando, il dischetto c 
tre programmi gratis, e la carta Applicard - Lire 30.000. 

□ Inviatemi sei numeri di Applicando, il dischetto 
omaggio, la carta Applicard + Le pagine del Software 
per Apple (due edizioni) - Lire 40.000. 


□ Allego assegno non trasf. 

a Editronica S.r.l. 


Lire 30.000 intestato 


I 


□ Allego ricevuta di versamento sul conto 

corrente postale n. 19740208 intestato a Editronica s.r.l. 
C.so Monforte 39,20122 Milano. 

□ Pago fin d’ora con la mia carta di Credito 

BankAmericard numero . 

scadenza . 

autorizzando la Banca d’America e d’Italia ad 
addebitare l’importo sul mio conto BankAmericard. 


/ 

^ Cognome , 

/ 

Nome. 

jj Via. 


. Città 


\ 

J 


/ 


Data. Firma 

Abbonatemi a partire dal numero. 



















































Vivere col 
computer 

a Roma. 



per chi di computer sa tutto ed ha bisogno di assi 
stenza specialistica, di software, di una stampante 
nuova, di libri, o anche solo di un pacco di carta... 
per chi non sa niente ma vorrebbe sapere, e capire: 
assistenza informativa, corsi di formazione, guida al¬ 
l’acquisto, consulenza... 

per chi ha un computer e per chi no; per un video 
a colori, i dischi, un modello nuovo, espansioni ed inte¬ 
grazioni di sistema... 


DimpiAlmp 



f|cippkz computer 

il nuovo Apple, punto d’arrivo della linea II, dopo Apple 
Il e Apple II plus. Ora con tastiera migliorata, tasti 
sensibili ed ergonomici, in versione italiana. Migliore 
visualizzazione, maiuscola e minuscola, sul video 
24 linee da 40 o 80 caratteri. Memoria espansa: 64 
K byte espandibili a 128, con 16 K di memoria ROM per 
l’uso contemporaneo di due linguaggi di programma. 

e presenterà, presto, 
il favoloso 


pappié computar distributore per l'Italia 

Rivenditore Autorizzato 

computershop 

Via Nomentana 265-273 
Tel. (06) 84.50.078 



: PRINT X<NO,1): PRINT 
5340 PRINT X(N1,I); PRINT 
5350 PRINT X(N2,I): PRINT 
5360 A = INT <X(N4,I)):T = INT 
(HU « (X(N4,1) - A 4 CO) / T 
D) 

5370 Al = STRI (A):T$ = STRI (T 
): IF LEN (TI) < N2 THEN TI 
. n "0 - 4 TI 

5380 PRINT Al 4 PEI 4 TI: PRINT 

5390 PRINT X(N3,1): PRINT : POKE 
33,40: POKE 32,0: POKE 35,24 
: 60T0 5280 
5400 NEXT I 
5410 RETURN 

6020 REM QUESTA ROUTINE MOSTO* 

6030 R01 I RISULTATI SULLO SCHE 
RM0 

6060 CALL - 936 :K2 = NI 
6070 VTAB 8: PRINT TAB< 5)*INTR 
0DURRE IL NUMERO DEL RECORD" 

: PRINT : INPUT 1 <RTN) PER 
VEDERLI TUTTI "jAI 
6080 KZ = WL (Al): IF KZ < P5 THEN 
KZ = NI 

6090 IF KZ ) 1 THEN RETURN 
6100 CALL - 936 
6110 PRINT TAB( N4)"NOME": PRINT 
: PRINT TAB( N4)"PREZZO D'A 
CQUIST0 L": PRINT : PRINT TAB( 
N4)"VALORE ME L": PRINT 
: PRINT TAB< N4)" INTERESSE 
N0MIWLE X": PRINT 
6120 PRINT TAB( N4)"SCADB1ZA (M 
E-6I0)": PRINT : PRINT TAB( 

N4)"SCADENZA ( ANNO )": PRINT 
: PRINT TA6( N4) "RENDIMENTO 
LORDO (X) ": PRINT : PRINT 
TAB( N4)"GUADAGNO DI CAPITA 
LE e/.)": PRINT 

6130 PRINT TAB< N4)"RENDIMENTO 
MEDIATO <%)": PRINT : PRINT 
TAB( N4)"AL NETTO DI TASSE 
(X)" 


6140 

FOR K = KZ TO I 


6160 

REM CREA LA FINESTRA 


6180 

HTA6 30: POKE 33,15: POKE 3 


2,24: POKE 35,BM: CALL - 

■ 93 

6190 

0 

T = LEN (BNI(K)):S = ABS ( 


N6 - T) 


6200 

PRINT SPC( S)BNI(K);" 

■ ,u 

RCD 

6210 

PRINT 


6220 

TI = STRI (X(N0,K)):T = 

LEN 


<TI):S = ABS (N6 - T) 


6230 

PRINT SPC< S)TI: PRINT 


6240 

TI = STRI (X(N1,K)):T = 

LEN 


(TI):S= ABS (N6 - T) 


6250 

PRINT SPC< S)TI: PRINT 


6260 

W = X(N6,K) 4 Cl: GOSUB 

180 


6270 T s LEN (WI):S = ABS <N6 - 
T) 

6280 PRINT SPC( S)WI: PRINT 
6290 A = X(N4,K):B s INT (A) 

6300 Wl * STRI ( INT (HU « (A - 
B 4 CO) / TD)):S = ABS (N3 - 
LEN (Wl)) 

6310 PRINT SPC( S)M0I( INT (X(N 
4,K)));WI: PRINT 

6320 PRINT SPC( N2)X(N3,K): PRINT 

6330 W = X(N7,K) 4 CIi 60SUB 180 

6340 T = LB1 <WI):S s ABS <N6 - 
T) 

6350 PRINT SPC( S)WI 
6360 PRINT 

6370 W = X(N8,K) 4 d: G0SUB 180 

6380 T = LBI(WI):S= ABS <N6 - 
T) 

6390 PRINT SPC( S)WI 
6400 PRINT 

6410 W = X(N9,K) 4 CJ: 60SUB 180 

6420 T = LEN (Wl) :S = ABS <N6 - 
T) 

6430 PRINT SPC( S)WI 
6440 PRINT 

6450 W * X(NQ,K) 4 d: 60SUB 180 
6460 T = L01 (Wl) :S * ABS (N6- 
T) 

6470 PRINT SPC( S)WI 
6480 Rei RICREA LA FINESTRA 
6490 POKE 32,0: POKE 33,40 
6500 CC = K: GOSUB 10000 
6510 BM = 20 

6520 IF NS * NI THEN NS = NO: GOTO 
6600 

6530 IF NS = N4 THEN NS = NO: GOTO 
6591P 

6540 IF NS = N3 THEN 6570 
6550 BNI(K) = ASIsNS = NO:DL = NI 
6560 GOTO 6590 
6570 NS = N0:N = CC:L = CC 
6580 60SUB 3070:SC = NO: GOTO 61 
80 

6590 NEXT K 

6600 BM = 24: IF DL > P5 THEN 60SUB 
2000:DL = NO 
6610 RETURN 

7010 RBi OUTPUT SU STAMPANTE 
7030 CALL - 936 
7040 INPUT "STAMPA DEI RISULTATI 
? (S/N) ";AI 

7050 PRINT 

7060 IF LEFTI (Al,NI) < > SI THEN 
RETURN 

7070 PRINT "ACCENDERE LA STMPAN 
TE E": PRINT 

7080 INPUT "INSERIRE IL NUMERO D 
EL SUO SLOT ";AI:N = VAL 
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ni. Il programma chiede di inserire il 
numero d’ordine del record che si vuo¬ 
le esaminare, o di battere RETURN 
per vederli tutti, uno dopo l’altro. I 
rapporti calcolati sono 4, e precisa- 
mente il rendimento immediato, il 
guadagno di capitale, il rendimento 
complessivo e il rendimento al netto di 
tasse. Il rendimento immediato è il va¬ 
lore nominale diviso per il prezzo d’ac¬ 
quisto e moltiplicato per il tasso d’inte¬ 
resse. Quindi delle obbligazioni con 
valore nominalelOO e pagate 50, il cui 
interesse sia il 4%, avranno un rendi¬ 
mento immediato dell’8% (100/50* 
4%). 

Il rendimento da guadagno di capi¬ 
tale è uguale all’apprezzamento del- 
l’obbligazione, cioè di quale percen¬ 
tuale del prezzo d’acquisto è maggiore 
del prezzo d’acquisto stesso il valore 
nominale, sulla vita dell’obbligazione 
stessa. Quindi se le obbligazioni del¬ 
l’esempio precedente fossero rimbor¬ 
sabili dopo 10 anni dall’acquisto, il 
rendimento da guadagno di capitale 
sarebbe del 100%/10 anni, cioè del 
10% annuo. Il rendimento complessi¬ 
vo è un calcolo immediato, dato dalla 
somma del guadagno di capitale e del 
rendimento immediato. 

Il valore calcolato per ultimo è il 
rendimento al netto di eventuali tasse, 
che nel caso di obbligazioni prive di 
ritenuta, come i titoli di Stato, risulta 
identico al rendimento complessivo. 

Dopo che i valori introdotti dall’u¬ 
tente e i rapporti calcolati dal pro¬ 
gramma sono stati mostrati sul video, 
si può usufruire degli stessi comandi 
disponibili nella routine di inserimen¬ 
to dati, cioè «R», «C», «M» e RE¬ 


CAI) 

7090 1F N < NI OR N > N? THEN PRINT 
Gl: GOTO 7030 

7100 CALL - 936: VTAB 7: PRINT 
'INSERIRE IL NUMERO DEL RECO 
RD INIZIALE 0": INPUT 'PREME 
RE <RET> PER IL PRIMO RECORD 
- " ;AI: PRINT : PRINT 
7110 IF Al 2 NLI THEN KK 2 1: GOTO 
7130 

7120 KK 2 UAL CAI) 

7130 1F KK < P5 THEN KK 2 ON 
7140 PRINT 'INSERIRE IL NUMERO D 
EL RECORD FINALE 0': INPUT ' 
PREMERE <RET> PER L'ULTIMO R 
EC0RD - ';AI 

7150 IF Al 2 NLI THEN LR 2 I: GOTO 
7170 

7160 LR 2 UAL CAI) 

7170 CALL - 936: PRINT TABC 3) 
'PREMERE 'S' PER FERMARE LA 
STAMPA': VTAB 4: HTAB 1: P0KE 
34,3: PRI N 

7180 REM ROUTINE DI Ilf/IO ALLA 
STAMPANTE 

7190 KN 2 KK ♦ 6: IF KN > LR THEN 
KN 2 LR 

7200 PRINT CHRI CNU): PRINT SPCC 
5)'«* CALCOLO DEL RENDIMENT 
0 DELLE OBBLIGAZIONI #«': PRINT 
7210 T 2 INT CTR * HU ♦ .5) 

7230 PRINT 'RECORD NO. '; 

7240 FOR K 2 KK T0 KN 

7250 TI * STRI CK):T = LEN CTI) 

:S 2 N8 - T 

7260 PRINT SPCC S)TI; 

7270 NEXT K 

7280 PRINT CHRI CNU) 

7290 G0SUB 8030 


7300 PRINT 'NOME OBBLIGAZIONE'; 
7310 FOR K 2 KK T0 KN 
7320 IF LEN CBNICK)) ) N8 THEN 
BNICK) 2 LEFTI CBNICK) ,N8) 
7330 T= LEN CBNICK)):S = ABS C 
N8 - T) 

7340 PRINT SPCC S)BNICK); 

7350 NEXT K 

7360 PRINT CHRI CNU) 

7370 GOSUB 8030 

7380 PRINT 'PREZZO D'ACQUISTO'; 
7390 FOR K 2 KK T0 KN 
7400 TI 2 STRI (XC0,K)):T 2 LEN 
CTI):S 2 N8 -T 
7410 PRINT SPCC S)TI; 

7420 NEXT K: PRINT CHRI CNU) 

7430 60SUB 8030 

7440 PRINT mORE NOMINALE '; 
7450 FOR K 2 KK T0 KN 
7460 TI 2 STRI (XCN1,K)):T 2 LEN 
CTI):S 2 N8 - T: PRINT SPCC 
S)Tlj: NEXT K 
7470 PRINT CHRI CNU) 

7480 GOSUB 8030 

7490 PRINT 'MESE DI SCADBtfA '; 
7500 FOR K 2 KK T0 KN 
7510 T 2 XCN4,K):A 2 INTCT):TI 2 
MOKA) 

7520 Wl 2 STRI < INT (HU * (T - 
A ♦ CO) / TD)):T 2 LEN CWI 
):S 2 N5 - T 

7530 PRINT SPCC S)TI;WI; 

7540 NEXT K 

7550 PRINT CHRI CNU) 

7560 60SUB 8030 

7570 PRINT 'AH10 DI SCADENZA '; 

7580 FOR K 2 KK TO KN 
7590 TI 2 STRI (X(3,K)):S 2 4 
7600 PRINT SPCC S)TI: 


Figura 2. 

Un esempio della 
tabella che si 
può ottenere con 
il programma 
obbligazioni. I 
tassi di 
rendimento 
segnalati sono 
tre: quello lordo, 
quello 
immediato, 
quello al netto da 
eventuali 
tassazioni. 


*** CALCOLO DEL RENDIMENTO DELLE OBBLIGAZIONI *** 


RECORD NO. 

1 

2 

3 

4 

5 

6 

7 

NOME OBBLIGAZIONE 

I RI 

BTp 

CIS 

ICIPU 

IMI 

ENEL1 

SMI 

PREZZO D'ACQUISTO 

90 

94 

87 

95.4 

86.9 

91 .2 

86.9 

VALORE NOMINALE 

ÌOO 

ÌOO 

100 

100 

ÌOO 

100 

ÌOO 

MESE DI SCADENZA 

APRI 

OTTI 

OTTI 

LUG1 

LUG1 

LUG1 

DICI 

ANNO DI SCADENZA 

1988 

1987 

1989 

1985 

1987 

1986 

1988 

INT. NOMINALE 

12.00 

12.00 

9.00 

8.00 

6.00 

6.00 

6.00 

RENDIMENTO LORDO 

16.17 

14.63 

13.10 

12.51 

1 1 .66 

11 .03 

10.19 

GUAD. DI CAPITALE 

2.83 

1 .87 

2.76 

4.12 

4.76 

4.45 

3.29 

RENDIM.IMMEDIATO 

13.33 

12.77 

10.34 

8.39 

6.90 

6.58 

6.90 

AL NETTO DI TASSE 

14.73 

13.25 

11.98 

11.60 

10.92 

10.32 

9.45 
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TURN. Questi comandi producono 
gli stessi effetti di prima, anche se ope¬ 
rano in maniera lievemente diversa. 

Il comando «S» (cancellazione) so¬ 
stituisce immediatamente il nome del- 
l’obbligazione con una stringa formata 
da tre asterischi (A$=“* *”), pone 
l’interruttore DL ale passa a mostra¬ 
re il record successivo. Il comando 
«R» effettua per prima cosa un con¬ 
trollo sulla variabile DL e, se questa 
vale 1, esegue il GOSUB 2000 della 
riga 6000, che cancella tutti quei re¬ 
cord il cui nome risulta essere “***”, 
quindi ritorna al programma principa¬ 
le. Il comando «M» (modifica) per¬ 
mette, come prima, di cambiare e ag¬ 
giornare i dati del titolo in esame, pu¬ 
lendo e modificando solo la finestra 
sulla destra dello schermo, quella cioè 
dove sono stampati i valori. 

Infine un RETURN mostrerà dati e 
valori calcolati del record successivo, 
sempre cambiando soltanto la parte 
destra del video. 

Stampa dei risultati 

L’opzione n.5 parte dalla riga 7000, 
e permette all’utente di avere una 
stampa incolonnata di tutti i parametri 
delle obbligazioni (vedi Figura 2). 
Questa routine, che chiede l’inseri- 
mento del numero del primo e dell’ul¬ 
timo record che si vuole stampare, fa 
un ritorno di carrello dopo aver stam¬ 
pato i dati dello stesso tipo di sette 
obbligazioni. La stampa può essere in¬ 
terrotta in qualunque momento pre¬ 
mendo il tasto «S». 

Ordinamento dei dati 

Scegliendo l’opzione n.6 l’utente 
può catalogare i record in base a uno 
qualunque dei campi in ordine decre¬ 
scente e anche in ordine alfabetico. Il 
menù di ordinamento parte dalla riga 
13000, mentre la routine vera e pro¬ 
pria inizia alla riga 1000, all’inizio del 
programma per velocizzarne l’esecu¬ 
zione. Il funzionamento è molto sem- 


7610 NEXT K 

7620 FRINÌ CHRi (NW) 

7630 GOSUB 8030 

7640 PRINT "INT. NOMINALE "; 

7650 FOR K = KK TO KN 
7660 W = X(N6,K) ♦ CI : 60SUB 180 
:T = LEN <WÌ):S = ABS (N8 

- T) 

7670 PRINT SPC< S)WÌ; 

7680 NEX7 K 

7690 PRINT CHR$ (NW) 

7700 GOSUB 8030 

7710 PRINT "RENDIMENTO LORDO "; 

7720 FOR K = KK T0 KN 
7730 W = X(N7,K) + Cl: GOSUB 180 
:T = LEN (Wì):S = ABS (N8 

- T) 

7740 PRINT SPC< S)WÌ; 

7750 NEXT K 

7760 PRINT CHRi (NW) 

7770 GOSUB 8030 

7780 PRINT "GUAD. DI CAPITALE"; 

7790 FOR K = KK T0 KN 
7800 W = X(N8,K) ♦ Cl: GOSUB 180 
:T = LEN (WÌ):S = ABS <N8 

- T) 

7810 PRINT SPC< S)WÌ; 

7820 NEXT K 

7830 PRINT CHRi (NU) 

7840 GOSUB 8030 

7850 PRINT "RENDIM. MEDIATO "; 

7860 FOR K = KK T0 KN 
7870 W = X(N9,K) 4 Cl: GOSUB 180 
sì = LEN (Wì):S * ABS (N8 

- T) 

7880 PRINT SPC< S)WÌ; 

7890 NEXT K 

7900 PRINT CHRi (NW) 

7910 PRINT "AL NETTO DI TASSE"; 

7920 FOR K = KK T0 KN 
7930 W = X(NQ,K) 4 Cl: GOSUB 180 
:T = LEN (Wì):S = ABS (N8 

- T) 

7940 PRINT SPC< S)WÌ; 

7950 NEXT K 

7960 PRINT CHRI (NW) 

7970 IF KN ) = LR THEN 8070 
7980 KK = KK 4 7:KN = KK ♦ 6 
7990 IF KN > LR THEN KN 3 LR 
8000 PRINT : PRINT 
8010 GOTO 7200 

8020 REM CONTROLLO DEI TASTI PR 
EMUTI 

8030 B= PEEK <- 16384): P0KE - 
16368,0: IF B < 127 THEN RETURN 
8040 IF B = 211 THEN POP : 6OT0 
8070 

8050 RETURN 

8060 REM AZ2ERA LA FINESTRA E RI 
COLLEGA IL DOS 

8070 POKE 34,0: CALL - 375: CALL 

- 365: CALL 1002: RETURN 


10000 REM ROUTINE DI CORREZIONE 
10040 NS = 0: POKE 35,24 
10050 VTAB 21: HTAB 25: PRINT "R 
AL MENU" 

10060 VTAB 22: HTAB 25: PRINT "C 
CANCELLA REC" 

10070 VTAB 23: HTAB 25: PRINT "M 
MODIFICA REC" 

10080 VTAB 24: HTAB 24: PRINT "R 
ET PROSSIMO REC"; 

10090 HTAB 1 

10100 POKE 33,20: POKE 32,0: POKE 
34,22 

10110 GET Ai: IF Ai = NLÌ THEN 1 
0110 

10120 IF Ai < > "R" THEN 10150 
10130 POKE 33,40: POKE 32,0: POKE 
34,0 

10140 NS = 1: RETURN 
10150 IF Ai < > "C" THEN 10180 
10160 POKE 33,40: POKE 32,0: POKE 
34,0 

10170 NS = 2: RETURN 
10180 IF Ai < > "M" THEN 10210 
10190 POKE 33,40: POKE 32,0: POKE 
34,0 

10200 NS = 3: GOTO 10250 
10210 IF Ai = CHRi (NW) THEN 10 
230 

10220 PRINT Gi: 6GT0 10110 
10230 POKE 33,40: POKE 32,0: POKE 
34,0 

10240 NS = 4: RETURN 

10250 REM ROUTINE DI MODIFICA 

10290 REM CREA LA FINESTRA 

10300 POKE 33,3 

10310 CALL - 936: PRINT "1 -" 

10320 PRINT "2 -" 

10330 PRINT "3 

10340 PRINT "4 -" 

10350 PRINT "5 - B 

10360 PRINT "6 -": VTAB 23: HTAB 

1 

10370 POKE 33,40: REM RICREA LA 
FINESTRA 

10380 POKE 33,20: POKE 32,0: POKE 
34,21 
10390 REM 

10400 CALL - 936: PRINT "CAMPO 
NO." 

10410 6ET Ai: IF WL (Ai) < P5 OR 
WL (Ai) > 6.5 THEN PRINT 
GÌ: GOTO 10400 
10420 A = VAL (Ai) 

10430 CALL - 936 

10440 PRINT "INSERIRE "SPRINT 
EFi(A);" ";: INPUT Ai 
10450 IF A = 1 THEN BNÌ(CC) = LEFTi 
(Ai,N5)s GOTO 10570 
10460 IF WL (Ai) = NO THEN PRINT 
Gì: GOTO 10390 

10470 IF A = N2 THEN X(N0,CC) = 
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Figura 3. 

Con la routine di 
ordinamento è 
possibile 
ottenere una 
catalogazione 
delle 

obbligazioni in 
base a uno 
qualsiasi dei 
campi che 
vengono 
segnalati. 


*** ROUTINE DI ORDINAMENTO *** 


0 - ALFABETICO 

1 - TASSO D'INTERESSE 

2 - RENDIMENTO LORDO 

3 - RENDIMENTO DA GUADAGNO DI CAPITALE 

4 - RENDIMENTO IMMEDIATO 

5 - RENDIMENTO AL NETTO DI TASSE 

6 - PREZZO D'ACQUISTO 

7 - MALORE NOMINALE 

8 - SCADENZA <ANNO) 

? - SCADENZA (MESE) 

<RET> - RITORNO AL MENU 


VAI (Al): GOTO 10570 
10480 IF A = N3 THEN X(N1,CC) = 

VA L (Ai): GOTO 10570 
10490 IF A = N4 THEN X(N2,CC) = 

VAI (Ai): 60T0 10570 
10500 IF A < ) N5 THEN 10550 
10510 A = VAL (Ai): IF A < P5 OR 
A > = NU THEN PRINT GÌ: GOTO 
10390 

10520 T = HU « (A - INT (A)): IF 
T > NO THEN PRINT GÌ: GOTO 
10390 

10530 X(N4,CC) = TD * (A - INT ( 
A)) ♦ INT (A)s IF X(N4,CC) = 
VAI (Ai) THEN X(N4,CC) = X( 
N4,CC) ♦ TD / HU 
10540 6QT0 10570 
10550 IF A = N6 ANO LEN (Ai) < 

> N4 THEN PRINT Gì: 60T0 1 
0390 

10560 X(N3,CC) = VAL (Ai): GOTO 
10570 

10570 CALL - 936: PQKE 33,3: POKE 
34,0: CALL - 936: POKE 33,4 
0: RETURN 

11000 0NERR GOTO 16000 
11010 EFid) = -NONE OBBLIGA?’ 

11020 EFì(2) = ’PR D'ACQUISTO’ 

11030 EFì(3) = -VALORE NOMINALE’ 
11040 EFÌ<4) = 'TASSO INTERESSE’ 
11050"EFÌ(5) = 'MESE SCADENZA’ 

11060 EFÌ(6) = ’AWO SCADENZA' 

11180 TT = 10000:HU = 100:ZZÌ = ’ 
00’:PEÌ = ViTU = 12:P5 = . 
5:ASÌ = ’«** ’:N0 

= 0:N1 = 1:SÌ = ’S’:STÌ = ’ 
**’:NLÌ = ”:ND = 31 
11190 N5 = 5:N2 = 2:N3 = 3:N4 = 4 
:F30 » 30:HH » 200:N6 = 6:N7 
= 7:N8 = 8:N9 = 9:NQ = 10:N 
W = 13:BM = 24 sTD = 3.3333:C 
0 = .005:C1 = .00005 
11200 Gì = REM Gì = (CONTROL 
> G 

11210 DIM BNì(2O0),MOÌ(12),X(U, 
200),ECì<15) 


11220 GOSUB 17000 
11230 REM MENU 
11290 TEXT : HOME 
11300 PRINT SPC< 14)’*** M0(U * 

**’: PRINT : PRINT 
11310 PRINT TAB( N5)'l - INSERÌ 
MENTO DATI DA TASTIERA’: PRINT 
11320 PRINT TAB< N5)’2 - CARICA 
MENTO DATI DA DISCO’: PRINT 

11330 PRINT TAB< N5)'3 - REGIST 
RAZIONE DATI SU DISCO’: PRINT 

11340 PRINT TAB< N5)’4 - VISUAL 
IZ2AZIONE/CORREZIONE DATI’: PRINT 

11350 PRINT TAB( N5)'5 - SMA 
DEI RISULTATI': PRINT 
11370 PRINT TAB( N5)’6 - 0RDIM 
MENTO': PRINT 

11380 POKE 36,N5 - 1: PRINT ’7 - 
FINE’;: NTAB 27: PRINT 1}” 

;: IWERSE : PRINT "RECORD’: 
NORMAL : PRINT : PRINT 
11390 PRINT TAB< N8)’SCELTA OPZ 
IONE NUMERO 

11400 HTAB 1: VTAB 24: POKE 34,2 
3 

11410 6ET Ai: IF Ai = NLì THEN 1 
1410 

11420 A = VAL (Ai) 

11430 IF A > P5 AND A < 8.5 THEN 
11450 

11440 PRINT Gì: GOTO 1L410 
11450 POKE 34,0 

11460 0N A 60SUB 5060,14000,1500 
0,6060,7030,13000,11480 
11470 60TO 11230 
11480 POKE 34,21: PRINT ■ 

SICURO? (S/N) 

11490 GET Ai: IF Ai = NLÌ im 1 
1490 

11500 IF Ai < > Sì THEN 11230 
11510 END 

13000 REM ROUTINE DI 0RDINAMENT 
O 


plice: partendo dal record n.l il pro¬ 
gramma esamina tutti i record alla ri¬ 
cerca di quello che abbia il valore più 
alto in quel determinato campo. Quin¬ 
di scambia il primo record con quello 
col valore più alto, e il procedimento 
riprende con il secondo record e così 
via fino alla fine. Con più di 100 record 
l’ordinamento richiede circa un minu¬ 
to. Infine l’opzione n.7, che determina 
la fine del lavoro con questo program¬ 
ma. Il suo scopo è evidente: viene co¬ 
munque chiesta la conferma della 
scelta. 

La struttura 
del programma 

La routine che inizia alla riga 110 è 
una versione particolare di PRINT 
USING e converte la variabile a virgo¬ 
la mobile VV in forma decimale, per 
esempio 0.0650, in una stringa con due 
cifre decimali VV$, in questo caso 
6.50. Questa routine di conversione 
per prima cosa prende la parte intera 
del valore decimale, la moltiplica per 
10000 e la converte in una stringa T$ 
(riga 190). Quindi viene costruita VV$ 
inserendo PE$ prima della se¬ 
conda cifra da destra, dopodiché si ri¬ 
torna all’istruzione successiva alla 
chiamata della routine. Questa routi¬ 
ne viene usata ogni volta che compare 
sullo schermo un numero nella forma 
XX.XX. Inoltre dato che l’Applesoft 
tronca i numeri a virgola mobile in 
maniera variabile, bisogna aggiungere 
un fattore di correzione di 0.0005 (la 
variabile Cl) al valore da convertire 
prima di chiamare la subroutine. 

Dopo l’esecuzione di un GOSUB a 
questa routine di conversione, il nu¬ 
mero è convertito in una stringa VV$ 
la cui lunghezza varia da quattro (per 
esempio 0.56%) a sei (145.78%). Di 
conseguenza per allineare i punti deci¬ 
mali è necessario, dopo avere effettua¬ 
to la conversione, determinare la lun¬ 
ghezza VV$ e inserire il numero ade¬ 
guato di spazi prima che VV$ sia stam¬ 
pato sullo schermo. Le linee di pro¬ 
gramma 6330 e 6340, tra le altre deter¬ 
minano a questo scopo un campo di 
stampa ampio sei caratteri, mentre la 
funzione ABS, usata per esempio nel¬ 
la riga 6340, serve ad evitare problemi 
nel caso che il campo di output ecceda 
i sei caratteri. Questo PRINT USING 
può essere tranquillamente usato in 
altri programmi. 

I calcoli e la stampante 

I calcoli veri e propri sui dati delle 
obbligazioni vengono effettuati dalla 
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riga 3000 alla 3170. L’output con la 
stampante prevede un formato di 60 
righe. Se la stampante fosse priva di 
page feed, cioè dello scorrimento au¬ 
tomatico del modulo di carta, occorre 
aggiungere l’appropriato numero di 
comandi PRINT alla riga 8000. Se la 
stampante prevedesse speciali codici 
di controllo per operare, devono esse¬ 
re aggiunti alla fine della riga 7170. 

L’individuazione degli errori nel 
programma è stata condotta in due 
modi differenti. Per prima cosa tutti i 
dati in ingresso sono esaminati diretta- 
mente al momento dell’introduzione 
per evitare valori impropri. Inoltre la 
routine alla riga 16000 intrappola gli 
errori del disco sui quali il programma 
non ha controllo, permettendo così di 
conservare i dati in caso di errore e di 
tornare al menù principale con tutti i 
dati inalterati. La quantità di dati che 
sarà possibile gestire dipende dalla 
configurazione dell’Apple che si pos¬ 
siede, Con 48K e l’Applesoft in Rom, 
il programma gestisce in Ram i dati di 
200 obbligazioni. Per modificare la ca¬ 
pacità del programma cambiate non 
solo i dimensionamenti delle matrici 
alla riga 11210, ma anche la variabile 
HH alla riga 11190. 

Le finestre 

Le finestre sono ampliamente usa¬ 
te, specialmente nella routine di modi¬ 
fica. Oltre a dare un aspetto meno 
confuso al programma, evitando di 
cancellare e riscrivere continuamente 
tutto lo schermo; impediscono gli 
scroll indesiderati. Questo è partico¬ 
larmente evidente alla riga 10380, che 
crea una finestra molto piccola nel 
margine inferiore sinistro dello scher¬ 
mo per l’introduzione del numero che 
specifica il campo da modificare e del 
nuovo valore. Dopo che quest’ultimo 
è stato inserito si ritorna allo schermo 
completo grazie alle istruzioni della ri¬ 
ga 10570. In questo modo si può essere 
sicuri che la nuova finestra venga sem¬ 
pre creata correttamente. 

Le matrici 

I dati delle obbligazioni, come pe¬ 
raltro i valori calcolati, sono immagaz¬ 
zinati nella matrice X(N,n. record), 
dove N è uno dei dati o dei valori 
calcolati. I nomi dei titoli sono nel vet¬ 
tore BN$(n.'record). Da notare che in 
quinta posizione, cioè in X(5,n. re¬ 
cord) non esiste alcun valore. Questo 
buco è intenzionale, dal momento che 
può risultare conveniente disporre 
dello spazio per un altro valore. 


13050 CALL - 936 

13060 MS(NQ) = NQ:MS(N1) = N6:MS< 

N2) = N7:MS(N3) = N8:MS(N4) = 
N9:MS(N5) = NQ:MS(N6) = N0:M 
S(N7) = NI:MS(N8) = N3:VS<N9 
) = N4 

13070 PRINT TAB< 5)"*** ROUTINE 

DI ORDINAMENTO PRINT 
: PRINT 

13080 PRINT TAB< N3)'0 - ALFABE 
TICO" 

13090 PRINT TAB< N3)'l - TASSO 

D'INTERESSE' 

13100 PRINT TAB< N3)'2 - RENDIM 
ENTO LORDO" 

13110 PRINT TAB< N3)'3 - RENDIM 

ENTO DA 6UADAGN0 DI CAPITALE 

■ 

13120 PRINT TAB< N3) B 4 - RENDIM 
BCT0 IMMEDIATO" 

13130 PRINT TAB< N3)"5 - RENDIM 
ENTO AL NETTO DI TASSE" 

13140 PRINT TAB< N3) B 6 - PREZZO 
D'ACQUISTO" 

13150 PRINT TAB< N3)"7 - MALORE 
NOMINALE" 

13160 PRINT TAB< N3) B 8 - SCADEN 
ZA (AMO)" 

13170 PRINT TAB< N3)"9 - SCADEN 
ZA (MESE)": PRINT 
13180 PRINT TAB< N5)"<RET> - RI 
TORNO AL MENU": PRINT : PRINT 

13190 MTAB 20: PRINT TAB< 2)"IN 
SERI RE IL CAMPO D'ORDINAMENE 
0 "; 

13200 6ET Ai: IF Al = NLI THEN 1 
3200 

13210 IF Al * CHRi (NW) THEN RETURN 
13220 IF Ai = "0“ THEN A = 0: GOTO 
13240 

13230 A = MAL (Ai): IF A < P5 OR 
A > 9.5 THEN PRINT GÌ: 60TQ 
13190 

13240 CALL - 936: MTAB N9: HTAB 
16: FLASH : PRINT "IN ORDINA 
MENTO': N0RMAL 
13250 IF A = NO THEN 1270 
13260 A = MS(A) 

13270 GOTO 1000 

14000 REM QUESTA ROUTINE CARIC 

A I DATI 

14030 REM DAL FILE 'B0NDDATA' 

14040 CALL - 936: F0R J = NI T0 
N8: PRINT Gl: NEXT J 
14050 MTAB 11: PRINT TAB< 10)"I 
NSERIRE IL DISCO DATI" 

14060 MTAB 13: HTAB 10: INPUT "E 
PREMERE RETURN" ;AÌ 
14070 Di = CHRi (4):BR = NI :JJ = 

NO: CALL - 936: MTAB TU: IF 
I < P5 THEN 14130 
14080 PRINT 'AGGIUNGERE Al DATI 


IN MEMORIA? (S/N) '; 

14090 GET Ai: IF Ai = NLi THEN 1 
4090 

14100 IF LEFTI (Ai,NI) ( ) Si THEN 
I = NO:BR = NI: GOTO 14120 
14110 JJ = 1:BR = I 
14120 PRINT : PRINT 
14130 PRINT 'INSERIRE L'IDENTIFI 
CATQRE DEL FILE" 

14140 PRINT : PRINT "0 PREMERE ' 

C' PER IL CATALQG' 

14150 PRINT : PRINT '0 'M' PER T 
ORNARE AL MBW "; 

14160 6ET FFI: IF FFì = NLi THEN 
14160 

14170 IF FFI = "M" THEN RETURN 

14180 IF FFI < > "C B THEN 14240 

14190 PRINT " CALL - 936 
14200 PRINT DÌ;"CATAL08" 

14210 PRINT : PRINT "PREMERE UN 
TASTO PER CONTINUARE": 

14220 6ET Ai: IF Ai = NLI THEN 1 
4220 

14230 60T0 14000 
14240 CALL - 936: MTAB TU: HTAB 
N9: N0RMAL 

14250 PRINT "IN CARICM0TTO B0ND 
DATA"jFFì 

14260 PRINT Di;"OPEN B0NDDATA";F 
FI 

14270 PRINT Dij-READ B0NDDATA" ;F 

FI 

14280 INPUT KK 

14290 I = I ♦ KK 

14300 IF 1 ) HH THEN I = HH 

14310 F0R J = JJ ♦ NI T0 I 

14320 INPUT BNI(J) 

14330 INPUT X(N0,J) 

14340 INPUT X(N1,J) 

14350 INPUT X(N2,J) 

14360 INPUT X(N4,J) 

14370 INPUT X(N3,J) 

14371 INPUT X(11,J) 

14380 NEXT J 

14390 PRINT DI;"CL0SE BONDDATA'j 
FFI 

14400 DI * NI: G0SUB 3030:DI = NO 
: RETURN : REM CALCOLA I R 
ISULTAT1 

15000 REM QUESTA ROUTINE SALMA 
I DATI 

15030 REM SUL FILE 'B0NDDATA' 

15050 IF I > P5 THEN 15090 
15060 CALL - 936: MTAB 11: PRINT 
TAB( 10)"NESSUN DATO IN MEM 
ORIA" 

15070 MTAB 13: HTAB 14: INPUT B P 
REMERE RETURN";AI 
15080 RETURN 

15090 CALL - 936: FOR J = NI T0 
N8: PRINT Gl: NEXT J 
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15100 VTAB 11! PRINT TAB< 1Q)'J 
NSERIRE IL DISCO DATI" 

15110 VTAB 13: HTAB 10: INPUT "E 
PRBiERE RETURN" ;A$ 

15120 CALL - 936! VTAB ?: HTAB 
N9 

15130 PRINT 'INSERIRE IL NUMERO 
DEL FILE'; 

15140 SET FF$: IF FF* = NL$ THEN 
15140 
15150 REM 

15160 CALL - 936! VTAB TW: HTAB 
N9: NORMAL 

15170 PRINT 'IN SCRITTURA BOND D 
ATA';FF$ 

15180 W = CHR$ (4) 

15190 PRINT D$;'OPEN BONDDATA'jF 
F* 

15200 PRINT Dij'DELETE BONDDATA' 

;FF* 

15210 PRINT Wj'OPEN BONDDATA';F 
F$ 

15220 PRINT W; "URITE BONDDATA'; 

FF* 

15230 PRINT I 
15240 FOR J = NI TO I 
15250 PRINT BNI(J) 

15260 PRINT X(NO,J) 

15270 PRINT X(N1,J) 

15280 PRINT X<N2,J) 

15290 PRINT X(N4,J) 

15300 PRINT X(N3,J) 

15305 PRINT Xdl,J) 

15310 NEXT J 

15320 PRINT D$;'CLQSE BONDDATA'; 

FF* 

15330 NORMAL 
15340 RETURN 

16000 RB1 ROUTINE DEGLI ERROR 

Le subroutine 

La posizione delle subroutine all’in- 
terno di un programma è molto impor¬ 
tante per l’efficienza e la velocità. 
Quelle eseguite frequentemente, co¬ 
me quelle iterative (per esempio la 
conversione) sono poste all’inizio del 
programma per una esecuzione più ra¬ 
pida. Infatti, quando l’Applesoft in¬ 
contra un GOTO o un IF...THEN se¬ 
guito da un numero di linea, va alla 
ricerca di quella linea partendo dall’i¬ 
nizio del programma. Di conseguen¬ 
za; se la routine di ordinamento fosse 
verso la fine, la sua esecuzione richie¬ 
derebbe un tempo più lungo. 

Un altro aiuto per rendere più velo¬ 
ce il programma è l’assegnazione di 
numerose costanti, a nomi di variabili, 
fatta alle righe dalla 11.180 alla 
11.200. L’Applesoft interpreta le va¬ 
riabili tra parentesi molto più rapida¬ 
mente delle costanti. In pratica, Y = X 
(N5) è eseguito molto più velocemen- 


I 

16050 EC = PEEK (222) 

16060 60T0 16160 
16070 CALL - 936s FOR T = NI TO 
N8: PRINT W: NEXT T 
16090 VTAB 10: PRINT ' «* ERROR 
E DI DISCO «*' 

16110 PRINT TAB< N4)'NOME': PRINT 
: PRINT TAB< N4)'PREZZO D'A 
CQUISTQ L": PRINT : PRINT TAB< 
N4)'VALORE NOMINALE L': PRINT 
: PRINT TAB< N4)'INTERESSE 
NOMINALE e/.)': PRINT 
16130 PRINT : PRINT EC*(EC) 

16140 PRINT : INPUT ' PRBIERE RET 
URN PER CONTINUARE';Af 
16150 GOTO 11230 
16160 ECf(l) » 'LINGUAGGIO NON DI 
SP0NIBILE' 

16170 EC$<4) = 'PROTETTO DA SCRIT 
TURA' 

16180 EC$(5) = 'FINE DEI DATI' 

16190 EC$<6) = 'FILE INESISTENTE' 

16200 EC$(8) = "ERRORE DI INPUT/O 
UTPUT' 

16210 EC$<9) = 'DISCO PIENO' 

16220 EC$<10) = "FILE PROTETTO' 

16230 ECIdl) = 'ERRORE DI SINTAS 
SI' 

16240 60T0 16070 
17000 TI = '6ENFEBMARAPRMAG6IULUG 
AGOSETOTTNOVDIC 
17010 T = - N2 
17020 FOR J = NI TO TU 
17030 T = T ♦ N3 
17040 MOI(J) = MIDI <TI,T,N3) 

17050 NEXT J: RETURN 


te di Y = X (5). 

Terminate le spiegazioni tecniche, 
bisogna precisare che il panorama del 
mercato obbligazionario non è com¬ 
pleto se non si citano le obbligazioni 
indicizzate. Si tratta di titoli il cui tasso 
d’interesse, e per alcuni anche il valore 
nominale, fluttua nel tempo con scatti 
semestrali in relazione all’andamento 
di un paniere di beni di consumo, e il 
cui rendimento complessivo varia, 
compensando almeno nelle intenzioni 
gli effetti dell’inflazione sugli investi¬ 
menti. 

La struttura attuale del programma 
non consente di confrontare il rendi¬ 
mento dei titoli a tasso fisso con quello 
delle obbligazioni indicizzate, ma non 
è escluso che Applicando pubblichi, in 
uno dei prossimi numeri, una routine 
da inserire in questo programma che 
permetta di completare l’analisi delle 
opportunità che il mercato di questi 
titoli può offrire. ■ 
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Che posto avrai 
domani se usi solo 
strumenti di ieri? 



Il tuo ruolo nel mondo di domani 
corrisponde alle tue capacità di inte¬ 
grarti con i nuovi sistemi di cultura e 
di comunicazione. 

Il programma “EDUCATIVO” Ital- 
ware, società del gruppo FININVEST, 
è una serie di packages che, secondo 
uno schema di difficoltà graduali, of¬ 
fre la possibilità di verificare la tua ca¬ 
pacità di dialogo con il computer e di 
arricchire il tuo livello di ragionamen¬ 
to, di linguaggio e di percezione. 

Richiedili spedendo il tagliando. 

INTRODUCTION TP COUNTING: 

introduce alle prime nozioni di arit¬ 
metica, al riconoscimento di for¬ 
me, pesi e misure. Studiato 
con grafici colorati' ed 
animazioni per impa¬ 
rare giocando. 


COMPU-READ: 

migliora la velocità di lettura dell’inglese, la 
memoria e la scioltezza del linguaggio; svilup¬ 
pa e rafforza la capacità di leggere parole, 
lettere, sinonimi e contrari, frasi. 

È in grado di adeguarsi al livello d’istruzio¬ 
ne dell’utente. 

SPELLING BEEGAMES: 


incrementa la capacità di leggere l’inglese e 
comporre le parole, mediante quattro giochi 
animati che affinano il coordinamento dei mo¬ 
vimenti simultanei occhio-mano, il senso del¬ 
le proporzioni, la memoria visiva. 



NOME . 
COGNOME . 
Cod. Fise. 


PERCEPTIQN GAMES: 
é strutturato per affinare la percezione visi¬ 
va coordinando i movimenti dell’occhio e delle 
mani. Impiegato dalla NASA per la simulazione 
a terra delle condizioni spaziali durante l’ad¬ 
destramento degli astronauti. 

Indispensabile l’impiego del paddle. 

RENDEZ-VOUS: 

simula l’aggancio nello spazio tra un’astrona¬ 
ve ed una stazione orbitante, mettendo così 
alla prova le cognizioni di scienze, di fisica e 
di calcolo matematico nonché la capacità per¬ 
cettiva dell’utente. 

EMPIRE II: 

è un gioco di azione, sofisticato per la com¬ 
plessità delle situazioni e per il livello di diffi¬ 
coltà in termini di prontezza di riflessi. 

Dal possesso dell’astronave amabilità di dotarla 
degli strumenti necessari, dal superamento de¬ 
gli ostacoli (esplosione, burocrazia, false indi¬ 
cazioni, strettoie, ecc...) al raggiungimento 
della meta più ambita: l’Empire II. 

Peachtree Software 

by EDU' 


I.V.A. _ 


CITTA. 


CAP. 


VOGLIATE INVIARMI A MEZZO POSTA E CON RELATIVA GARANZIA I PRO¬ 
GRAMMI CONTRADDISTINTI CON UNA CROCETTA: 


©a» —| 

ITALWARE 

. Società Italiana Software J 

È una società del Gruppo FININVEST 

Palazzo Borromini - 20090 MILANO 2 
Tel. 02/21621 - Telex 316197 CANL5 


□ INTRODUCTION TO COUNTING 
(L. 130.000+IVA 18%) 

□ COMPU-READ 
(L. 100.000 +IVA 

□ SPELLING BEE GAMES 
(L. 130.000+IVA 

Allego assegno per L.. 


□ PERCEPTION GAMES 
(L. 120.000 +IVA 

□ RENDEZ-VOUS 
(L. Il0.000+IVA 

□ EMPIRE II . 

(L 110.000 +IVA 18%) 


X 


_intestato a Italware. Seguirà, a breve giro 

di posta, regolare fattura. Nei prezzi indicati sono incluse le spese di spedizione. Per l’acquisto 
di due programmi calcolare sconto del 10%, acquistando tre o più programmi sconto 15%. 
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Riuscirete a mangiare tutti i mostri che si trovano nel 
op labirinto evitandoli quando diventano arancione? 

Come nei migliori videogame a gettone, il pericolo non è 
farne indigestione ma... 

Un mostro 
tira l’altro 



C om’è nella migliore 
tradizione dei Pac- 
man, i popolari video-game 
a gettone che trovano ospi¬ 
talità in un gran numero di 
bar, anche questo gioco per 
Apple ne segue lo spirito: 
fare scorpacciata di mostri 
quando sono mangiabili, 
sfuggirli quando al contrario 
sono indigesti. 

Ai fini del punteggio, i dot 
normali valgono 10 punti 
ciascuno, e ognuno dei quat¬ 
tro dot energetici lampeg¬ 
gianti vicino agli angoli del 
labirinto vale 100 punti. 

Quando si mangia uno di 
questi dot carichi di energia, 
si diventa energizzati, e si 
possono mangiare i mostri 
quando sono blu. 

Il valore dei mostri che vengono 
mangiati è di 100, 200, 400 e 800 punti 
rispettivamente per il primo, il secon¬ 
do, il terzo e il quarto mostro. 

Quando si è finito un labirinto, si 
passa a quello successivo, pieno di altri 
dot da mangiare. Il gioco però si fa più 
difficile a mano a mano che si procede. 
I mostri diventano più aggressivi, e lo 
stato di energia che si ricava dall’aver 
mangiato un dot energetico dura di 
meno. Se si tocca uno dei mostri men¬ 
tre è arancione, si perde una delle tre 
vite di cui si dispone. Quando si sono 
perdute tutte e tre le vite il gioco ha 
termine. 

Lo sgranocchiatore di dot viene co¬ 
mandato usando i tasti A e Z per spo¬ 
starlo in su e in giù e le frecce destra e 
sinistra per spostarlo nelle rispettive 
direzioni. Se si vuole usare il joystick 
basta premere il tasto CTRL insieme a 


J (CTRL-J). Se si decide di usare la 
tastiera, si preme CTRL-K. 

Si può fermare il gioco in qualsiasi 
momento premendo il tasto ESC, bat¬ 
tendo qualsiasi altro tasto si riprende il 
gioco. CTRL-S serve a escludere gli 
effetti sonori. 

Se si preme CTRL-S quando non c’è 
il suono, lo si fa tornare. CTRL-R fa 
ricominciare il gioco. 

Come nasce un gioco 

La prima idea era di scrivere il gioco 
in Applesoft, ma si prese in esame la 
possibilità di usare la grafica ad alta 
risoluzione e le tavole delle figure. Na¬ 
turalmente si è dovuto far ricorso al 
linguaggio assemblatore per rendere il 
gioco abbastanza veloce e sono stati 
usati i flag dell’Applesoft, in modo da 
eliminare lo sfarfallio che altrimenti 
sarebbe stato presente. 


Il primo problema era 
quello di rappresentare il la¬ 
birinto e i dot. Una soluzio¬ 
ne naturale per il labirinto è 
quella di costruire una ma¬ 
trice bidimensionale, larga 
10 e alta 11, in cui l’elemen¬ 
to (X,Y) rappresenti le pos¬ 
sibili direzioni di sposta¬ 
mento di un essere quando 
si trovi nella colonna X e sul¬ 
la riga Y. 

Nel BASIC ciò è abba¬ 
stanza semplice, ma è possi¬ 
bile rappresentare le matrici 
in linguaggio assemblatore? 
Dando alla matrice la di¬ 
mensione di 16 unità nel 
senso orizzontale, si può fa¬ 
re facilmente così: moltipli¬ 
care per 16 la riga, aggiunge¬ 
re il numero di colonna per ottenere lo 
scarto finale dall’inizio della matrice e 
utilizzare l’indirizzamento indicizzato 
assoluto per ritrovare l’elemento di 
matrice voluto. 

Ciò funzionerà a dovere a patto che 
non si abbia bisogno di indicizzare più 
di 255 byte al di là dell’elemento di 
partenza. Dato che occorrono solo 11 
righe, e 16x11 fa meno di 255, tutto 
dovrebbe essere a posto. 

Si è scelto come dimensione della 
matrice 16 anziché 10 perché così fa¬ 
cendo basteranno quattro istruzioni 
ASL, anziché dover richiamare una 
routine di moltiplicazione per molti¬ 
plicare per 10 il numero di riga. Ci 
saranno purtroppo sei byte inutilizzati 
per riga. 

Il problema a questo punto è di far 
stare in un unico byte i dati relativi a 
un’intersezione. A qualsiasi incrocio 
sono quattro le direzioni che è possibi- 
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le prendere. In ognuna di esse ci può 
essere o no un muro. Tutto quel che 
occorre fare è mettere in un bit i dati 
per ciascuna direzione, con il bit ugua¬ 
le a zero se in quella direzione c’è un 
muro, e uguale a uno se non c’è (il che 
vuol dire che in quella direzione si può 
avanzare). Se le direzioni possibili (in 
su, a destra, a sinistra e in giù) sono 
contrassegnate da 0 a 3 vengono messi 
questi dati del muro, che indicano co¬ 
me sia legale avanzare nelle direzioni 
da 0 a 3, nei bit da 0 a 3 del byte 
relativo a ciascuna intersezione. 

Dot ordinari 
e dot energetici 

È il problema che si è rivelato il più 
arduo da risolvere e la cui soluzione ha 
dato maggiori soddisfazioni. 

Nel labirinto c’è una quantità di dot 
quadrupla di quella degli incroci. È 
necessario tenere i dati relativi a cia¬ 
scun dot in un byte separato rispetto ai 
dati di qualunque altro dot. Ciò signi¬ 
fica che occorre una matrice che sia 
all’incirca di 20 elementi di larghezza e 
20 di altezza. 

Attraverso qualche semplice molti¬ 
plicazione è emersa la necessità di po¬ 
ter accedere a dati distanti fino a 400 
byte dall’inizio della matrice. Questo 
ha escluso la possibilità di usare il mo¬ 
do di indirizzamento indicizzato asso¬ 
luto. La conclusione è stata la conve¬ 
nienza di puntare sul modo di indiriz¬ 
zamento indicizzato indiretto. Questo 
sistema permette di specificare un in¬ 
dirizzo di base per ciascuna riga della 
matrice, purché ogni riga della matrice 
abbia meno di 255 byte (nel caso in 
esame ne ha soltanto una ventina). 

Ecco adesso i dati concernenti cia¬ 
scun dot. Su una tavola si trovano due 
tipi diversi di dot: dot ordinari e dot 
energetici. I dot ordinari sono identifi¬ 
cati con il numero uno, quelli energeti¬ 
ci con il numero due. Se un dot non 
esiste (vale a dire se è stato già mangia¬ 
to), gli viene dato il numero zero. Poi, 
però, occorre recuperare lo stato ori¬ 
ginario della tavola (dove si trovavano 
i dot energetici, dove non c’era alcun 
dot e così via) quando è il momento di 
cominciarne una nuova. 

Invece di copiare l’intera matrice in 
qualche altro punto della memoria si è 
deciso di conservare il valore iniziale 
del dot rappresentato quattro bit più 
alti di ciascun byte della matrice, i 
quattro bit più bassi invece conserva¬ 
no lo stato presente di quel dot. 

Per reinizializzare la matrice, baste¬ 
rà copiare i quattro bit superiori del 
byte nei quattro inferiori. 


Le direzioni del giocatore 

Risolti i problemi dei dati relativi al 
labirinto e ai dot, ecco come si muove 
il giocatore. Per cominciare occorrono 
due variabili riguardanti la direzione. 
In primo luogo è necessario D per con¬ 
servare in memoria la direzione nella 
quale il giocatore sta andando al pre¬ 
sente. Se viene fermato D sarà un nu¬ 
mero diverso da quelli compresi fra 0 e 
3. L’altra variabile sarà K. 

K conserverà la direzione nella qua¬ 
le vuole andare, che è determinata dal 
più recente comando da tastiera. 

Durante il gioco due sono le condi¬ 
zioni possibili: o il giocatore è a un 
incrocio oppure no. Per prima cosa 
occorre prendere i dati del labirinto 
relativi a questo incrocio. Poi si con¬ 


10 REM ***#m***»##**#**###* 

11 REM * N I B B L E R * 

12 REM * BY BRENT IVERSON * 

13 REM * COPYRIGHT (C) 1983 * 

14 REM * BY APPLICANDO A * 

15 REM * MICRO-SPARC INC. * 

16 REM **»***«««*«*«***»*«»** 

20 TEXT : HOME ; INVERSE 

30 VTAB 5: HTAB 13: PRINT V SPC< 

13)"s": HTAB 13: PRINT * N I B 
B L E R HTAB 13: PRINT V 
SPC< 13)“:" 

40 N0RMAL : VTAB 12: HTAB 12: PRINT 
•COPYRIGHT 1983 BY": PRINT : HTAB 
7: PRINT "APPLICANDO & MICRO S 
PARC,INC. 1 : VTAB 9: HTAB 12: PRINT 
•BY: BRENT IVERSON" 

49 : 

50 REM —CARICA IL PROGimtt IN 

LINGUAGGIO MACCHINA 

51 : 

60 VTAB 23: HTAB 11: PRINT 'CARICA 
IL PROGRAM" 

70 PRINT CHR* (4)*BL0AD NIBBLER.O 
BJ" 

79 : 

80 REM —CARICA TAVOLA DELLE FIG 

URE 

81 : 

90 VTAB 23: HTAB 1: PRINT SPC< 9) 
•CARICA TAVOLA FIGURE";: CALL 
- 868 

100 PRINT : PRINT CHR* <4>"BLQAD 
NIBBLER.SHAPES,A$1500" 

109 : 

110 REM —PREDISPONE I PUNTATORI 
DELLA TAVOLA 


trolla K per vedere in quale senso il 
giocatore vorrebbe andare. Se i dati 
del labirinto indicano che sarebbe giu¬ 
sto viaggiare da questo incrocio nella 
direzione K (ossia non c’è un muro sul 
cammino), si cambia D in K. Se non va 
bene andare da questa intersezione 
nella direzione K, si controlla se sareb¬ 
be giusto andare nella direzione D. Se 
la direzione D è possibile, non si fa 
niente. Così il giocatore continuerà a 
muoversi nel senso in cui sta andando. 

Ma se nessuna delle due direzioni è 
possibile? Allora occorre fermare il 
giocatore nel punto in cui si trova. Co¬ 
sì se D ha un numero non compreso fra 
0 e 3, ciò indica che il giocatore è fer¬ 
mo. In questo caso, cioè quando né D 
né K sono direzioni legali in cui avan¬ 
zare dall’incrocio, basta cambiare D in 


111 

: 


120 

P0KE 232,0: POKE 233,21: SCALE= 

129 



130 

REM - 

—ATTESA 

131 

J 


140 

VTAB 23: HTAB 5: PRINT SPREMI 


UN TASTO PER COMINCIARE)' 

150 

POKE 

- 16368,0 

160 

UAIT 

- 16384,128 

169 

: 


170 

REM - 

-PULISCE LA SECONDA PAG 


m GRAFICA 

171 

: 


180 

HGR2 


189 

: 


190 

REM - 

-INIZIO DEL GIOCO 

191 

: 


200 

CALL 24576 

209 

; 


210 

REM - 

-PASSAGGIO DA TESTO A 

220 

REM 

PAGIM GRAFICA IN ATTE 


SA 


230 

REM 

DEL COMANDO DA TASTIER 


A 


240 

REM 

PER L'INIZIO DEL 6IQC0 

241 

: 


250 

VTAB 18: HTAB 12: FLASH : PRINT 
•GAME OVER": NORMAL 

260 

FOR I 

= 1 TO 2000: NEXT : POKE 


- 16368,0 

270 

POKE 

- 16304,0: POKE - 16297 


,0 


280 

FOR I 

= 1 T0 250: IF PEEK < - 


16384) 

> 127 THEN 180 

290 

NEXT : 

TEXT 

300 

FOR I 

= 1 TO 250: IF PEEK ( - 


16384) 

> 127 THEN 180 

310 

NEXT : 

GOTO 270 
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255 per fermare il giocatore. 

E se il giocatore non è a un incrocio? 
In tal caso si troverà o in un corridoio 
verticale o in un corridoio orizzontale. 
Se è in un corridoio verticale la sua 
direzione D sarà o 0 o 2. Se è in un 
corridoio orizzontale la sua direzione 
D sarà 1 o 3. 

Si supponga che sia in un corridoio 
verticale. Se D è uguale a K sta già 
viaggiando nella direzione in cui vuole 
andare e non occorre alcun controllo. 
Se invece K non è uguale a D, si pre¬ 
senta una di queste due condizioni: o 
vuole andare in una direzione vertica¬ 
le (K = 0 o 2) oppure vuole andare in 
una direzione orizzontale (K = 1 o 3). 
Se K è uguale a 1 o 3, non è possibile 
consentirlo e così continuerà ad anda¬ 
re nella direzione che stava seguendo. 


+ = INCROCIO 


+ + + 


+ + 


+ = INCROCIO 

Figura 1 


Altrimenti si cambia D in K. Il caso di 
un corridoio orizzontale è esattamente 
l’opposto. 

Dopo aver provveduto alle routine 
per la direzione, occorre prendere in 
considerazione i movimenti di sposta¬ 
mento. Non è stato ancora spiegato 
come determinare se lo sgranocchiato- 
re sia o no a un incrocio. All’atto prati¬ 
co è piuttosto facile. Le posizioni oriz¬ 
zontale e verticale del giocatore sono 
memorizzate in PX e PY. Le interse¬ 
zioni sono spaziate di 16 punti grafici 
una dall’altra, orizzontalmente e verti¬ 
calmente. (In questo caso «intersezio¬ 
ne» significa il centro esatto della in¬ 
tersezione, come indicato dal “ + ” nel¬ 
la Figura 1). 

È a questo punto che durante la pro¬ 
grammazione è stato commesso qual¬ 
che errore. I risultati di questi errori si 
trovano tuttora nel codice, e lo rendo¬ 
no un po’ difficile da capire. Per prima 
cosa si è pensato che essendo le inter¬ 
sezioni a 16 punti grafici di distanza 
sullo schermo bastava vedere se PX e 


PY fossero divisibili per 16. In caso 
affermativo il giocatore era a un’inter¬ 
sezione. Si sarebbe potuto allora divi¬ 
dere PX e PY per 16 e ottenere gli 
indici per il codice dell’intersezione 
della matrice. Per esempio, se PY e 
PX erano rispettivamente 32 e 48, l’e¬ 
lemento di matrice sarebbe stato 
(2,3), dove 2 era la riga di matrice e 3 
la colonna di matrice. Che cosa fare 
però se l’intersezione fosse stata (0,0)? 
Secondo le definizioni date sinora, 
questa intersezione si trova metà fuori 
schermo. Si decise che PX e PY avreb¬ 
bero continuato a rappresentare l’ef¬ 
fettiva posizione del giocatore sullo 
schermo, ma che per trovare un indice 
di matrice si sarebbe sottratto 8 da 
ciascuno di essi. 

In pratica, per trovare la «riga» e la 
«colonna» dell’intersezione nella qua¬ 
le è il giocatore, la formula non sareb¬ 
be stata (PY/16,PX/16) ma ((PY-8)/ 
16, (PX-8)/16). 

Così facendo, il problema sembrava 
risolto. Quando il giocatore si trovava 
a (8,8) sullo schermo sarebbe stato al¬ 
l’incrocio (0,0). Questo confinava l’in¬ 
tera tavola di gioco nell’angolo supe¬ 
riore sinistro dello schermo. 

Ma non era una soluzione definiti¬ 
va. Quasi alla fine del programma ci si 
accorse che per centrare la tavola sullo 
schermo si doveva spostare in giù di 7 
punti grafici e a destra di 59 punti. A 
causa del primo errore, e a causa di 
alcune supposizioni fatte in merito a 
PX e PY in altri punti del programma, 
si concluse che la maniera più rapida e 
facile di centrare qualcosa è quella di 
aggiungere 59 alla sua posizione oriz¬ 
zontale e 7 alla sua posizione verticale 
prima di disegnare sullo schermo. 

Si ha così nel programma come si 
presenta la posizione orizzontale e 
verticale del giocatore (e dei mostri). 
Ogni volta che si disegna il giocatore 
sullo schermo, si aggiunge qualche nu¬ 
mero alle variabili per avere la posizio¬ 
ne «reale» di schermo. Ogni volta che 
occorre usare le variabili per avere un 
indice di matrice, si deve sottrarre da 
esse qualche altro numero prima di 
dividerle. Non è esattamente ciò che i 
manuali di programmazione intendo¬ 
no per eleganza. Ma quando si ha un 
programma che funziona non si è incli¬ 
ni a modificarlo. 


Per creare i mostri 

I mostri cambiano direzione una so¬ 
la volta: quando si trovano a un’inter¬ 
sezione. Si può stabilire quando sono a 
un incrocio nello stesso modo in cui si 
determina quando è a un incrocio il 
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giocatore: basta sottrarre 8 dalle posi¬ 
zioni verticale e orizzontale dei mo¬ 
stri, poi dividerle per 16. Se entrambi i 
resti sono zero, il mostro è a un’inter¬ 
sezione. Si rammenti che queste posi¬ 
zioni orizzontali e verticali non sono le 
posizioni «reali» di schermo (anche 
queste hanno l’aggiunta di 59 e di 7). 
Se i mostri non sono a un’intersezione 
basta continuare a spostarli nella dire¬ 
zione presente. 

Quando i mostri sono a un incrocio 
si deve decidere da quale parte farli 
andare. L’attuale routine li può spo¬ 
stare o in una direzione casuale o in 
una direzione che li porti più vicini al 
giocatore. 

C’è una variabile denominata LE- 
VEL che viene adoperata per decidere 
quale delle due routine sarà utilizzata 
per un mostro. 

Il programma prende un numero 
(press’a poco) casuale compreso fra 1 
e 16. Poi confronta questo numero con 


CM 

4000- 

OD 

00 

1C 

00 

36 

00 

52 

00 

o 

4008- 

71 

00 

8D 

00 

9B 

00 

AA 

00 

(0 

4010- 

CE 

00 

EE 

00 

10 

01 

2F 

01 

Li 

4018- 

37 

01 

44 

01 

2A 

2C 

2C 

2C 


4020- 

B4 

35 

3E 

36 

37 

3F 

3E 

27 


4028- 

3F 

3C 

24 

27 

2C 

24 

0E 

2E 


4030- 

2E 

2E 

00 

24 

25 

2C 

2A 

24 


4038- 

25 

2C 

74 

36 

35 

3E 

36 

37 


4040- 

3F 

3E 

27 

3F 

3C 

24 

27 

2C 


4048- 

24 

25 

0E 

36 

35 

36 

00 

24 


4050- 

24 

24 

2A 

24 

24 

24 

0E 

35 


4058- 

35 

2E 

36 

37 

3E 

3E 

37 

3F 


4060- 

3C 

27 

27 

3C 

24 

25 

2C 

2C 


4068- 

25 

16 

36 

36 

06 

00 

24 

25 


4070- 

2C 

2A 

24 

25 

2C 

74 

36 

35 


4078- 

3E 

36 

37 

3F 

3E 

27 

3F 

3C 


4080- 

24 

27 

2C 

24 

25 

0E 

36 

35 


4088- 

3 6 

00 

6E 

B4 

1F 

6C 

6E 

B4 


4090- 

1F 

1F 

1F 

24 

1F 

36 

06 

00 


4098- 

OD 

24 

1F 

11 

OD 

OD 

24 

1F 


40A0- 

1F 

1F 

1F 

36 

OD 

05 

00 

18 


40A8- 

18 

18 

03 

18 

18 

18 

18 

18 


4QB9- 

18 

38 

24 

35 

0E 

24 

2D 

2D 


40B8- 

2D 

2D 

2D 

2D 

35 

3E 

3F 

3F 


40CQ- 

3F 

3F 

3F 

27 

2D 

2D 

2D 

2D 


40C8- 

2D 

35 

00 

21 

24 

24 

49 

49 


40DO- 

21 

24 

24 

24 

2C 

36 

36 

36 


4008- 

36 

36 

27 

16 

36 

36 

25 

24 


40E0- 

AC 

92 

24 

24 

24 

24 

24 

24 


40E8- 

24 

34 

00 

3A 

3F 

3F 

92 

92 


40FO- 

3A 

3F 

3F 

3F 

37 

2D 

2D 

2D 


4GF8- 

2D 

20 

2D 

2D 

25 

3F 

3F 

3F 


4100- 

DF 

DB 

DB 

12 

2D 

2D 

2D 

2D 


4108- 

2D 

2D 

2D 

2D 

00 

23 

24 

24 


4110- 

DB 

DB 

23 

24 

24 

24 

3C 

37 


4118- 

35 

37 

35 

37 

35 

37 

35 

37 


4120- 

35 

37 

35 

37 

35 

37 

2D 

24 


4128- 

24 

24 

04 

00 

15 

06 

00 

E6 


4130- 

OC 

15 

06 

00 

2C 

1C 

27 

36 


4138- 

OC 

2C 

1C 

27 

1E 

3E 

15 

06 


4140- 

00 

24 

3F 

1F 

31 

2D 

24 

3F 


4148- 

1F 

36 

3F 

24 

2D 

00 

80 

80 


4150- 

80 

00 








LEVEL, che è anch’esso compreso fra 
1 e 16. Se il numero casuale è maggiore 
di LEVEL si usa la routine di sposta¬ 
mento casuale. Altrimenti si impiega 
la routine di spostamento guidato. 
Con l’approssimarsi di LEVEL a 16 i 
mostri diventeranno sempre più ag¬ 
gressivi. 

Per arrivare a livelli da campioni 
LEVEL parte da uno. Ogni volta che 
il giocatore termina una partita, LE¬ 
VEL è incrementato di uno. LEVEL è 
tenuto sempre al disotto di 16. Per 
generare lo spostamento casuale basta 
prendere un numero casuale da 0 a 3 
che corrisponda a una possibile nuova 
direzione compresa fra 0 e 3. Se c’è un 
muro a impedire questo movimento, si 
incrementi il numero casuale e si provi 
di nuovo. Inoltre si tengano i mostri in 
circolazione e non si permetta a un 
mostro di tornare dalla parte da cui è 
giunto. 

Il controllo di questo comportamen¬ 


to evita l’aspetto oscillante dei mostri. 

La routine per lo spostamento gui¬ 
dato è un poco più complessa. In Figu¬ 
ra 2 viene dato un diagramma di flusso 
per questa routine. 

Lo spostamento 
degli «occhi» 

Un’ultima aggiunta fatta alla routi¬ 
ne di spostamento dei mostri riguarda 
quel che accade dopo che il mostro è 
stato mangiato dal giocatore. Come 
nel videogioco da bar il mostro si tra¬ 
sforma in un paio d’occhi e torna di 
corsa alla casella centrale. 

Farglielo fare si è rivelato un’opera¬ 
zione molto semplice. Quel che occor¬ 
re è sapere da che parte deve andare 
un mostro da ogni incrocio raggiunto 
quando sta tornando verso la casella 
centrale. Basta aggiungere una piccola 
matrice contenente la direzione che il 
mostro deve prendere a ogni interse- 


DIAGRAMMA di flusso per la routine di direzione guidata dei mostri 


Figura 2. 
Diagramma di 
flusso del 
programma. 
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zione quando non è che un paio d’oc¬ 
chi di ritorno verso la casella, e il gioco 
è fatto. 

Quando il giocatore 
mangiai dot 

Occorre ora studiare come il gioca¬ 
tore mangerà i dot. Si è detto prima di 
come i dot sarebbero stati rappresen¬ 
tati in memoria. Dato che le interse¬ 
zioni sono spaziate sullo schermo di 16 
dot, o punti grafici, i dot sono spaziati 
di 8 dot. La formula per recuperare la 
colonna e la riga dei dati di dot cui 
accedere è: COLONNA = px/8, 
RIGA=py/8. Si rammenti che nella 
matrice dei dati di dot ci sono colonne 
e righe in numero doppio di quelle 
della matrice dei dati di labirinto, dato 
che le intersezioni del labirinto sono 
spaziate a una distanza doppia di quel¬ 
la dei dot. 

Ogni volta che l’uomo mangia un 


dot (vale a dire ogni volta che i quattro 
bit più bassi di un dot sul quale passa lo 
sgranocchiatore non sono zero), il 
programma dapprima imposta su zero 
i quattro bit più bassi di quel byte, poi 
sottrae uno da una variabile denomi¬ 
nata NUMLEFT, che viene usata per 
tener nota del numero dei dot rimasti 
sulla tavola. Quando NUMLEFT rag¬ 
giunge zero, ha inizio una nuova parti¬ 
ta. Un’osservazione fra parentesi: l’ef¬ 
fetto di lampeggiamento dei dot ener¬ 
getici viene ottenuto semplicemente 
disegnandoli su una sola pagina Hi- 
Res anziché su entrambe, come si fa 
per i dot ordinari. Ecco perchè ogni 
volta che il programma volta pagina 
sembra che i dot lampeggino. 

La routine 
del punteggio 

La prima decisione è stata quella di 
mettere il punteggio nella finestra del 
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6000- 4C 

72 

60 

A4 

FD 

AO 

E8 

A0 

6160- 60 

4C 

AC 

61 

C9 

DA 

DO 

08 

62C0- A9 

05 

8D 

3F 

60 

20 

6F 

6B 

6008- AO 

A0 

CD 

A0 

FD 

A0 

A0 

B0 

6168- A9 

02 

8D 

3C 

60 

4C 

AC 

61 

62C8- A2 

08 

A9 

01 

9D 

1F 

60 

20 

6010- AO 

A0 

A0 

BB 

CD 

CC 

A0 

A0 

6170- C9 

93 

DO 

0B 

AD 

2E 

60 

49 

62D0- 87 

6B 

20 

AD 

6B 

4C 

F5 

62 

6018- AO 

90 

A0 

C7 

A0 

A0 

A0 

A0 

6178- 01 

8D 

2E 

60 

4C 

AC 

61 

C9 

62D8- AD 

30 

60 

18 

69 

3B 

AA 

A0 

6020- D6 

A0 

A5 

A0 

A0 

D2 

A0 

E1 

6180- 9B 

DO 

0B 

8D 

10 

CO 

AD 

00 

62E0- 00 

AD 

31 

60 

18 

69 

07 

20 

6028- AO 

A0 

A0 

A0 

A0 

85 

A0 

97 

6188- CO 

30 

21 

4C 

86 

61 

C9 

92 

62E8- 11 

F4 

A2 

06 

20 

30 

F7 

A9 

6030- AO 

B0 

A0 

A0 

A0 

A0 

BB 

A0 

6190- DO 

05 

68 

68 

4C 

72 

60 

C9 

62F0- 00 

20 

61 

F6 

60 

CE 

0A 

60 

6038- AO 

A2 

A0 

CE 

90 

DF 

A0 

88 

6198- 8A 

DO 

08 

A9 

00 

8D 

2F 

60 

62F8- AD 

0A 

60 

DO 

03 

4C 

F4 

67 

6040- AO 

A4 

A0 

A0 

DO 

F0 

A0 

A0 

61A0- 4C 

AC 

61 

C9 

86 

DO 

05 

A9 

6300- 4C 

5E 

63 

C9 

02 

DO 

57 

B1 

, 6048- AO 

A2 

CE 

A0 

ED 

A0 

A0 

A0 

61A8- 01 

8D 

2F 

60 

AD 

30 

60 

38 

6308- 06 

29 

F0 

91 

06 

A5 

E6 

8D 

6050- DF 

F9 

FD 

A0 

A2 

A2 

A0 

E6 

6180- E9 

08 

29 

0F 

C9 

01 

90 

03 

6310- 09 

60 

20 

6B 

67 

20 

41 

63 

6058- AO 

A0 

A0 

C5 

AE 

A0 

80 

D4 

61B8- 4C 

16 

62 

AD 

31 

60 

38 

E9 

6318- AD 

09 

60 

85 

E6 

AD 

10 

60 

6060- AC 

A0 

80 

A0 

A9 

A0 

CF 

A0 

61C0- 08 

29 

0F 

C9 

01 

90 

03 

4C 

6320- 0A 

0A 

DA 

0A 

49 

FF 

8D 

3E 

6068- E5 

A0 

8F 

A0 

89 

A0 

90 

AE 

61C8- 16 

62 

AD 

30 

60 

38 

E9 

08 

6328- 60 

A9 

01 

8D 

2D 

60 

20 

6F 

6070- E9 

A0 

A9 

05 

8D 

10 

60 

A9 

61 DO- 4A 

4A 

4A 

4A 

8D 

04 

60 

AD 

6330- 68 

A9 

01 

A2 

0? 

9D 

1F 

60 

6078- 01 

8D 

2E 

60 

8D 

2F 

60 

A9 

61D8- 31 

60 

38 

E9 

08 

18 

6D 

04 

6338- 20 

87 

6B 

20 

AD 

6B 

4C 

5E 

6080- 03 

8D 

40 

60 

20 

7B 

6B 

A9 

61E0- 60 

M 

BD 

C6 

6C 

8D 

05 

60 

6340- 63 

AD 

30 

60 

18 

69 

3B 


6088- 01 

8D 

11 

60 

8D 

12 

60 

20 

61E8- AD 

3C 

60 

C9 

04 

B0 

14 

AD 

6348- A0 

00 

AD 

31 

60 

18 

69 

07 

6090- F4 

67 

20 

53 

67 

20 

AC 

60 

61F0- 3C 

60 

20 

C3 

66 

F0 

OC 

AD 

6350- 20 

11 

F4 

A2 

OC 

20 

30 

F7 

6098- 20 

F9 

63 

AD 

3E 

60 

F0 

03 

61F8- 3C 

60 

8D 

3D 

60 

20 

EF 

63 

6358- A9 

00 

20 

61 

F6 

60 

EE 

33 

6QA0- CE 

3E 

60 

20 

53 

67 

20 

81 

6200- 4C 

69 

62 

AD 

3D 

60 

20 

C3 

6360- 60 

AD 

33 

60 

C9 

05 

90 

05 

60A8- 67 

4C 

95 

60 

AD 

34 

60 

8D 

6208- 66 

F0 

03 

4C 

69 

62 

A9 

FF 

6368- A9 

01 

8D 

33 

60 

AD 

3D 

60 

6QB0- 38 

60 

AD 

35 

60 

8D 

39 

60 

6210- 8D 

3D 

60 

4C 

69 

62 

AD 

3D 

6370- C9 

04 

BO 

26 

AE 

3D 

60 

BD 

60B8- AO 

36 

60 

8D 

3A 

60 

AD 

37 

6218- 60 

CD 

3C 

60 

DO 

03 

4C 

69 

6378- 87 

6F 

8D 

09 

60 

AD 

30 

60 

60CO- 60 

8D 

3B 

60 

AD 

30 

60 

8D 

6220- 62 

AD 

3C 

60 

C9 

04 

60 

41 

6380- 18 

6D 

09 

60 

8D 

30 

60 

AE 

60C8- 34 

60 

AD 

31 

60 

8D 

35 

60 

6228- AD 

3D 

60 

C9 

01 

F0 

0F 

C9 

6388- 3D 

60 
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COMPUTER SHOP 


A ROMA - Via G. Lanza 101-103-105 Tel. 738224 


Macintosh 


Mac 




COSMIC 

COSMIC 


6410- 8D 6F 60 BD 4D 60 8D 70 

6418- 60 BD 51 60 8D 71 60 BD 

6420- 55 60 9D 59 60 BD 5D 60 

6428- 9D 61 60 BD 65 60 9D 69 

6430- 60 AD 6D 60 9D 55 60 AD 

6438- 6E 60 9D 5D 60 AD 71 60 

6440- 9D 65 60 AD 70 60 F0 22 

6448- C9 FF DO 1B A9 58 CD 6E 

6450- 60 DO 17 AD 6D 60 C9 52 

6458- 90 10 C9 59 B0 OC AD 3E 

6460- 60 8D 70 60 4C 6A 64 CE 

6468- 70 60 AD 0B 60 29 01 DO 

6470- 18 AD 6E 60 C9 58 DO 11 

6478- AD 6D 60 C9 16 90 07 C9 

6480- 8A B0 03 4C 89 64 4C A0 

6488- 64 AE 6F 60 BD 87 6F 18 

6490- 6D 6D 60 8D 6D 60 BD 8B 

6498- 6F 18 6D 6E 60 8D 6E 60 

64A0- AD 6D 60 C9 05 B0 08 A9 

64A8- 9C 8D 6D 60 4C B8 64 C9 

64B0- 9D 90 05 A9 06 8D 6D 60 

64B8- AD 6D 60 38 E9 08 29 0F 

64C0- C9 01 90 03 4C FC 65 AD 

64C8- 6E 60 38 E9 08 29 0F C9 

64D0- 01 90 03 4C FC 65 AD 6E 

64D8- 60 C9 58 DO 14 AD 70 60 

64E0- F0 0F C9 FF B0 0B AD 6F 

64E8- 60 49 02 BD 6F 60 4C FC 

64F0- 65 AD 6D 60 38 E9 08 4A 

64F8- 4A 4A 4A 8D 04 60 AD 6E 

6500- 60 38 E9 08 18 6D 04 60 

6508- AA BD C6 6C 8D 05 60 AD 

6510- 70 60 C9 FF DO 21 AD 6D 

6518- 60 38 E9 08 4A 4A 4A 4A 

6520- 8D 04 60 AD 6E 60 38 E9 

6528- 08 18 6D 04 60 AA BD 9B 

6530- 6F 8D 6F 60 4C FC 65 20 

6538- B2 67 29 0F CD 10 60 90 

6540- 03 4C DB 65 A9 00 8D 13 

6548- 60 8D 14 60 AD 13 60 DO 

6550- 56 AD 14 60 DO 1D AD 30 

6558- 60 CD 6D 60 DO 03 4C A7 

6560- 65 AD 31 60 CD 6E 60 DO 

6568- 03 4C 73 65 20 B2 67 29 

6570- 01 DO 34 A9 01 8D 13 60 

. 6578- AD 30 60 CD 6D 60 90 05 

6580- A9 01 4C 87 65 A9 03 8D 

6588- 09 60 AD 3E 60 FO 08 AD 

6590- 09 60 49 02 8D 09 60 AD 

6598- 09 60 20 D2 66 DO 57 AD 

: 65A0- 14 60 FO A8 4C DB 65 A9 

65A8- 01 8D 14 60 AD 31 60 CD 

65B0- 6E 60 90 05 A9 02 4C BB 

65B8- 65 A9 00 8D 09 60 AD 3E 

65C0- 60 FO 08 AD 09 60 49 02 

65C8- 8D 09 60 AD 09 60 20 D2 

65D0- 66 DO 23 AD 13 60 DO 03 

65D8- 4C 4C 65 20 B2 67 29 03 

65EG- 8D 09 60 20 D2 66 DO OE 

65E8- EE 09 60 AD 09 60 29 03 

65F0- 8D 09 60 4C E3 65 AD 09 

65F8- 60 8D 6F 60 AD 6D 60 38 

6600- ED 30 60 C9 06 90 07 C9 

6608- FA BO 03 4C 23 66 AD 6E 

y ,6610- 60 38 ED 31 60 C9 06 90 

6618- 07 C9 FA BO 03 4C 23 66 

6620- 4C EB 66 AD 70 60 C9 FF 

6628- FO 08 AD 3E 60 DO 08 4C 

6630- 47 66 A9 OD 4C 49 66 C9 
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6658- BC 59 60 98 18 69 3B AA 
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6670- 30 F7 A9 00 20 61 F6 AD 

6678- 6D 60 18 69 3B AA AO 00 

6680- AD 6E 60 18 69 07 20 11 

6688- F4 AE 71 60 20 30 F7 A9 

6690- 00 20 61 F6 AE 08 60 AD 
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66A8- 60 AD 6F 60 9D 49 60 AD 
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6718- 4C 23 66 A9 50 8D 3E 60 

6720- A9 00 8D 3F 60 20 81 67 

6728- A9 82 20 A8 FC AD 3E 60 

6730- 18 69 05 8D 3E 60 C9 FF 

6738- 90 EB CE 40 60 AD 40 60 

6740- DO 09 68 68 8D 51 CO 8D 

6748- 54 CO 60 20 50 68 68 68 

6750- 4C 95 60 AD OB 60 49 01 

6758- 8D OB 60 DO 07 20 6B 67 

6760- 20 7B 67 60 20 70 67 20 

6768- 75 67 60 A9 20 85 E6 60 

6770- A9 40 85 E6 60 A9 00 8D 

6778- 54 CO 60 A9 00 8D 55 CO 

6780- 60 AD 2E 60 FO 2B AD 3F 

6788- 60 FO OD OA OA OA OA 8D 

6790- OF 60 20 A3 67 CE 3F 60 

6798- AD 3E 60 FO 14 8D OF 60 

67A0- 20 A3 67 A2 04 AC OF 60 

67A8- AD 30 CO 88 DO FD CA DO 

67B0- F4 60 20 D4 67 20 E4 67 

67B8- AD 11 60 4D 12 60 4D 30 

67C0- 60 4D 31 60 4D 08 60 4D 

67C8- GO CO 4D 3F 60 4D 6D 60 

67D0- 4D 6E 60 60 EE 11 60 AD 

67D8- 11 60 C9 09 90 05 A9 01 

67E0- 8D 11 60 60 EE 12 60 AD 

67E8- 12 60 C9 OA 90 05 A9 01 

67F0- 8D 12 60 60 20 OA 68 20 

67F8- 50 68 EE 10 60 AD IO 60 

6800- C9 10 90 05 A9 OF 8D 10 

6808- 60 60 A9 00 8D 03 60 A9 

6810- 00 8D 04 60 AD 03 60 OA 

6818- M BD 76 6D 85 06 BD 77 

6820- 6D 85 07 AC 04 60 B1 06 

6828- 29 FO 8D 05 60 4A 4A 4A 

6830- 4A OD 05 60 91 06 EE 04 

6838- 60 AD 04 60 C9 15 90 D4 

6840- EE 03 60 AD 03 60 C9 17 

6848- 90 C5 A9 AD 8D OA 60 60 

6850- 20 A7 68 20 CF 68 20 F3 

6858- 68 20 5F 69 20 E6 69 20 

6860- 32 6A 20 6E 6A 20 AD 6B 

6868- 20 08 6A 20 1B 6C 20 66 

6870- 6C 20 DF 6A AD 2E 60 FO 

6878- 1F A9 FF 8D 3E 60 A9 00 

6880- 8D 3F 60 20 81 67 A9 FF 

6888- 20 A8 FC AD 3E 60 38 £?| 


6890- OA 8D 3E 60 C9 C8 BO EB 

6898- A9 00 8D OB 60 8D 3F 60 

68A0- 8D 3E 60 20 53 67 60 A9 

68A8- 00 8D 50 CO 8D 52 CO 8D 

68B0- 55 CO 8D 57 CO A9 00 85 

68B8- 06 A9 20 85 07 A9 80 AO 

68C0- 00 91 06 C8 DO FB E6 07 

68C8- A6’ 07 EO 40 90 FI 60 A9 

68D0- 50 8D 30 60 8D 34 60 A9 

68D8- 88 8D 31 60 BD 35 60 A9 

68E0- 01 8D 3D 60 8D 33 60 8D 

68E8- 37 60 A9 10 8D 32 60 8D 

68F0- 36 60 60 A9 50 8D 41 60 

68F8- 8D 55 60 8D 42 60 80 56 

6900- 60 A9 4A 8D 43 60 8D 57 

6908- 60 A9 56 8D 44 60 8D 58 

6910- 60 A9 48 8D 45 60 8D 5D 

6918- 60 A9 58 8D 46 60 8D 47 

6920- 60 8D 48 60 8D 5E 60 8D 5 

6928- 5F 60 8D 60 60 A9 01 8D 

6930- 49 60 8D 4A 60 8D 4B 60 

6938- 8D 4C 60 A9 00 8D 4D 60 

6940- A9 28 8D 4E 60 A9 50 8D 

6948- 4F 60 A9 78 8D 50 60 A9 

6950- 05 A2 00 9D 51 60 9D 65 

6958- 60 E8 EO 04 90 F5 60 A2 

6960- 06 20 FO F6 20 6B 67 A9 

6968- 00 8D 03 60 A9 00 8D 04 

6970- 60 AD 03 60 OA OA OA OA 

6978- 8D 06 60 18 6D 04 60 AA 

6980- BD C6 6C 8D 05 60 AD 04 

6988- 60 OA OA OA OA 8D 07 60 

6990- A9 00 8D 09 60 AD 05 60 

6998- AE 09 60 3D 93 6F DO 21 

69A0- AD 07 60 18 69 43 M AO 

69A8- 00 AD 06 60 18 69 OF 20 

69B0- 11 F4 AE 09 60 BD 97 6F 

69B8- AA 20 30 F7 A9 00 20 05 

89C0- F6 EE 09 60 AD 09 60 C9 

69C8- 04 90 CA EE 04 60 AD 04 

69D0- 60 C9 OA BO 03 4C 71 69 

69D8- EE 03 60 AD 03 60 C9 OB 

69E0- BO 03 4C 6C 69 60 20 6B 

69E8- 67 AD 30 60 18 69 3B AA 

69F0- AO 00 AD 31 60 18 69 07 

69F8- 20 11 F4 AE 33 60 20 30 

6AQQ- F7 AD 32 60 20 61 F6 60 

6A08- A9 01 8D 08 60 CD 40 60 

6A10- BO 1F M BD 9D 70 AA AO 

6AI8- 00 A9 BD 20 11 F4 A2 OC 

6A20- 20 30 F7 A9 10 20 61 F6 

6A28- EE 08 60 AD 08 60 4C OD 

6A30- 6A 60 20 6B 67 A9 00 8D 

6A38- 08 60 AE 08 60 BD 41 60 

6A40- 18 69 3B 8D 09 60 BD 45 

6A48- 60 18 69 07 AO 00 AE 09 

6A50- 60 20 11 F4 AE 08 60 BD 

6A58- 51 60 M 20 30 F7 A9 00 

6A60- 20 61 F6 EE 08 60 AD 08 

6A68- 60 C9 04 90 CD 60 A9 00 

6A70- BD 03 60 A9 00 8D 04 60 

6A78- AD 03 60 OA AA BD 76 6D 

6A80- 85 06 BD 77 6D 85 07 AC 

6A88- 04 60 Bl 06 29 OF FO 34 

6A9Q- C9 01 DO 08 A9 OB 8D 09 

6A98- 60 4C Al 6A A9 OC 8D 09 

6AA0- 60 AD 04 60 OA OA OA 18 

6AA8- 69 3B AA AD 03 60 OA OA 

6AB0- OA 18 69 07 AO 00 20 11 

6AB8- F4 AE 09 60 20 30 F7 A9 

6AC0- 00 20 61 F6 EE 04 60 AD 

| 6AC8- 04 60 C9 15 BO 03 4C 78 
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testo, dato che il campo di gioco era 
verticalmente troppo grande per poter 
trovare posto sopra di essa. Pertanto si 
sarebbe dovuto rappresentare il pun¬ 
teggio sullo schermo Hi-Res. Sarebbe 
stato facile usare le tavole delle figure 
per le cifre dei numeri del punteggio, 
ma sarebbero state troppo lente. Si 
utilizzeranno invece le figure a bloc¬ 
chi. In questo caso sono facili da usare, 
dato che ognuna delle cifre occupa set¬ 
te punti grafici in orizzontale sullo 
schermo; pertanto non c’è da preoccu¬ 
parsi dello shifting e di molti altri pro¬ 
blemi tecnici. 

Così venne preparata una tabellina 
di dati per ciascuna delle cifre e studia¬ 
to come metterle sullo schermo. A 
questo punto subentrò un piccolo pro¬ 
blema. In precedenza si era pensato di 
rappresentare il punteggio come valo¬ 
re intero di 16 bit. Ma questo numero 
sarebbe stato in esadecimale. Come 
tradurre questa forma esadecimale in 
numeri decimali? Per evitare questo 
problema di traduzioni, il punteggio è 
rappresentato con 10 byte. Ogni byte 
va in valore da 0 a 9, e rappresenta una 
cifra decimale del punteggio. Per 
esempio, se i 10 byte sono 
0,0,0,0,0,3,4,0,1,0, il punteggio è 
34.010. 

Tutto quello che si deve fare con il 
punteggio è aggiungergli numeri, e 
quindi scrivere una breve routine per 
addizionare fra loro due numeri in 
questo formato. Questa piccola routi¬ 
ne riuscì bene, ed è una delle migliori 
sezioni di listato del programma. Ulte¬ 
riori particolari in merito alle routine 
di punteggio si possono trovare nei 
commenti del listato sorgente. È più o 
meno tutto. Adesso il programma è 
finito, o almeno lo sembra, anche se 
chiunque può apportare «una sola mo¬ 
difica ancora» per migliorare certe 
performance. Resta la cosa più impe¬ 
gnativa: battere i listati. 


Come battere 
il programma 

Per prima cosa si batte il program¬ 
ma in Applesoft del Listato 1, e lo si 
salva con questa istruzione: SAVE 
NIBBLER. Adesso occorre digitare il 
codice macchina principale del Listato 
2 e salvare tutto con questo comando: 
BSAVE NIBB 1 E.R , / ^.nnn, 
L$itóir 65/9 

Infine occorre battere e introdurre la 
tavola delle figure del Listato 3. Dopo 
averlo fatto, la si salva con il comando: 

A$1500, 'O0152t E finalmente buona 

.evAtecoo’ftMil 


£ 1983 by Nibble e Applicando 
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I videogiochi, dicono gli esperti, sono ripetitivi. Una volta 

scoperta la migliore strategia e ottenuta la necessaria abilità nel manovrare 

i tasti, tutto diventa monotono. Stressi nuovo gioco di 

Alessandro Mazzetti prodotto per Applicando, non presenta questi handicap: 

infatti è possibile fare divertenti giochi ma anche crearne sempre di nuovi. 


k 



Per vincere 
lo stress 


I videogame hanno ormai molti ap¬ 
passionati: sfidare il computer si¬ 
gnifica mettere alla prova i propri ri¬ 
flessi di fronte a un avversario veloce, 
preciso, quasi imbattibile. Vi è, però, 
un grande difetto nella maggior parte 
dei videogame: la ripetitività. 

qualche partita un abile gio¬ 
catore riesce ad acquisire la ne¬ 
cessaria abilità manuale e a 


scoprire la migliore strategia, renden¬ 
do così monotone le future partite. In 
sostanza la maggior parte dei videoga¬ 
me non permette al giocatore di eser¬ 
citare la fantasia, componente essen¬ 
ziale in qualsiasi gioco. Con «Stress» 
non è cosL «Stress», infatti, è un gioco 
forse meno appariscente, a prima vi¬ 
sta, di tanti altri ma molto più umano, 
nel senso che stimola le più svariate 
forme di fantasia umana. 

In un certo senso si può dire che 
«Stress» non è un gioco, ma un esecu¬ 
tore di giochi: i giochi veri e pròpri 
vengono inventati dal giocatore e in¬ 
stallati aH’interno di «Stress». 

Sono due in questo modo le attività 
che svolge chi usa «Stress»: giocare 
oppure installare un nuovo gioco. 
Quale delle due è la più divertente? La 
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risposta la potrà dare solo chi usa 
«Stress». A lungo andare, una volta 
acquisita la padronanza dei tasti e la 
necessaria abilità manuale, può diven¬ 
tare più divertente l’installazione anzi¬ 
ché il gioco vero e proprio. L’attività 
di installazione è più riflessiva e medi¬ 
tativa, ma darà senz’altro, quando si 
vedranno gli amici giocare al gioco 
creato da voi, una grande soddisfa¬ 
zione. 


Come si gioca 

All’inizio della sessione di gioco, 
«Stress» presenta sul video la lista dei 
giochi disponibili (Figura 1) 

Se per esempio si decide di giocare 




GIOCHI DISPONIBILI « 


MfftXffli 

PREMERE ■?■ PER ISTRUZIONI 
NONE DEL GIOCO —> ■ 


Figura 1. Il menù di giochi a 
disposizione in «Stress». Oltre a questi, 
il giocatore può installare nuovi giochi 
inventati da lui. 


ad «Estate», il primo della lista, sul 
video comparirà una maschera, come 

in Figura 2. 



Figura 2. Il gioco «Estate». Si presenta 
sul video come un insieme di «posti» 
(viaggio, mare, montagna, lavoro) e un 
insieme di «stati» (divertimento, salute, 
riposo, soldi). Il cursore (quadratino 
bianco) si muove in continuazione ed è 
comandato dai tasti di direzione. 

Per prima cosa si noti che vi sono 
alcuni «posti» ( viaggio, mare, monta¬ 
gna e lavoro) disposti a caso sul video. 
Ogni posto è formato da un disegnino 
e da una scritta in basso. Sulla sinistra 
del video ci sono delle strisce verticali: 
divertimento, salute, riposo e soldi. 


Scheda 

di classificazione 

Categoria: STRESS è un gioco 
didattico, di simulazione e di 
strategia con interfaccia grafica. 

Orientamento: STRESS non è in¬ 
dirizzato alle sale-gioco o ai bar: 
è un gioco orientato soprattutto a 
chi ha un calcolatore in casa o ai 
gruppi scolastici. E un gioco «in¬ 
telligente» che richiede al gioca¬ 
tore anche una partecipazione at- 
tiva (installazione di nuovi 
giochi). 

Configurazione: STRESS è di¬ 
sponibile attualmente su Apple 
II plus (con scheda Pascal) o su 
Apple Ile. È necessario almeno 
un floppy-disk drive; la stampan¬ 
te è consigliata ma non necessa¬ 
ria. È richiesta la tastiera ameri¬ 
cana e sono utilizzati solo i carat¬ 
teri maiuscoli; il video può essere 
a 40 o a 80 colonne. 

Prezzo: 55.000 lire. Per ordinare 
STRESS usare il tagliando a pag. 
98. 


Le stanghette vengono chiamate 
«stati», poiché rappresentano lo stato 
del personaggio in cui il giocatore si 
immedesima durante il gioco. Per 
esempio, se la stanghetta «soldi» è al¬ 
ta, allora si hanno molti soldi, quindi 
sarà possibile andare al «mare» o in 
«viaggio». Se invece fosse bassa, allo¬ 
ra si dovrà andare al «lavoro» per gua¬ 
dagnare soldi. 

Ma come si fa ad andare al «lavo¬ 
ro»? Bisogna dirigere il cursore verso 
il posto «lavoro», usando i tasti dire¬ 
zione (che sono A, S, W, Z). Quando 
il cursore vi sarà arrivato, si premerà il 
tasto Q per farlo fermare dentro al 
posto «lavoro» (cioè sovrapposto alla 
scritta, non al disegno). A questo pun¬ 
to le stanghette degli stati cominceran- 
no a muoversi e si vedrà che i «soldi» 
aumenteranno, mentre il «divertimen¬ 
to», la «salute» e il «riposo» scende¬ 
ranno. 

Attenzione: quando una stanghetta 
va a zero il gioco termina e verrà emes¬ 
so sul video un messaggio. 

Prima di vedere il messaggio finale, 
ecco come si sarebbe potuto continua¬ 
re il gioco. Si sarebbe dovuto uscire 
dal posto «lavoro», usando i tasti di 
direzione, dirigendo il cursore verso il 
posto «mare». Raggiunto il mare, si 
vedranno le stanghette degli stati ri¬ 


mettersi in movimento, ma questa vol¬ 
ta si muoveranno diversamente: lo sta¬ 
to «divertimento» salirà, con lo stato 
«salute», mentre lo stato «soldi» scen¬ 
derà. È ovvio, no? Al mare si spendo¬ 
no soldi ma ci si diverte e fa bene alla 
salute. Lo stesso discorso vale per gli 
altri posti: in viaggio, ad esempio, si 
spendono un mucchio di soldi (la stan¬ 
ghetta va giù molto in fretta) ma ci si 
diverte un sacco. 

Ottiene il punteggio più alto chi rie¬ 
sce a far durare, il più a lungo possibi¬ 
le, il gioco. Per fare ciò bisogna conti¬ 
nuamente passare da un posto all’altro 
cercando di mantenere alte le stan¬ 
ghette degli stati. Appena una di que¬ 
ste va a zero, il gioco termina e viene 
calcolato un punteggio sulla base del 
tempo di durata della manche. 

Se il gioco finisce a causa dell’azzera¬ 
mento dello stato «soldi», mentre il cur¬ 
sore si trovava al «mare», verrà emesso 
un messaggio come in Figura 3. 


PUN 58Ìlo ?0 2l l éf8R§? L g I 4°8fe E MflRE 



Figura 3. Se la stanghetta dei «soldi» 
dovesse andare a zero mentre il cursore 
si trovava sul posto «mare», allora il 
gioco termina (a causa 
deH’azzeramento dello stato) e viene 
emesso un messaggio di questo tipo. Il 
punteggio tiene conto del tempo di 
durata e del posto in cui si trovava al 
momento deU’azzeramento dello stato. 


Viene anche conservata una classifi¬ 
ca dei primi arrivati: premendo il tasto 
C (come Classifica) la si potrà vedere 

(Figura 4) 



Figura 4. Per ogni gioco viene 
conservata una classifica dei primi 
arrivati. 
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Se ora si preme G inizierà un altro 
turno: ovviamente i «posti» saranno 
disposti in diversa maniera secondo un 
algoritmo casuale. 

Ecco un altro esempio: all’inizio si 
dirige il cursore verso lavoro, in modo 
da procurare tanto danaro prima di 
andare in vacanza. Quando il cursore 
arriva sul posto «lavoro» si preme Q 
per fermare e far salire lo stato «sol¬ 
di». Ma, cosa sta succedendo? La stan¬ 
ghetta «soldi» sale molto più lenta¬ 
mente del previsto: come mai? Dando 
un’occhiata alle altre stanghette si no¬ 
ta che la stanghetta riposo è molto più 
bassa delle altre. Ecco il trucco. È ov¬ 
vio che se non si è riposati non si può 
rendere bene. Sarà meglio allora an¬ 
dare prima in «montagna» per un po’, 
e poi tornare al «lavoro». In questo 
modo, dopo aver alzato lo stato «ripo¬ 
so», si ottiene un miglior rendimento e 

10 stato «soldi» sale velocemente. 

Ora che si hanno tanti soldi si va a 

fare un bel «viaggio». Si dirige quindi 

11 cursore verso il «viaggio» e quando è 
sovrapposto alla scritta viaggio lo si 
ferma. Soddisfatti, si gode la scena 
guardando lo stato «divertimento» che 
sale allegro. 

Ad un certo punto si ode una serie di 
beep: cosa è successo? Niente paura: 
la stanghetta «divertimento» ha sem¬ 
plicemente raggiunto il limite massi¬ 
mo, cioè il margine superiore del vi¬ 
deo, e avverte che conviene andare 
altrove. Dove? 

La stanghetta «divertimento» è al¬ 
tissima, la stanghetta soldi è più o me¬ 
no a metà, così come anche «riposo» 
mentre la stanghetta «salute» è piutto¬ 
sto bassa. Conviene dunque alzarla. 
Quale sarà il posto che fa bene alla 
salute? Il mare; quindi via per il «ma¬ 
re». Dopo un po’ però si sente un nuo¬ 
vo beep. Infatti, anche al mare ci si 
diverte e la stanghetta «divertimento» 
è tornata al massimo. 

Forse sarebbe stato meglio fare pri¬ 
ma un salto in «montagna», o addirit¬ 
tura al lavoro. Il problema è che an¬ 
dando al lavoro la stanghetta salute 
sarebbe scesa ancora di più, rischian¬ 
do di annullarsi e di fare terminare il 
gioco con un messaggio del tipo: «Tor¬ 
nato ammalato dalle vacanze». 

Giocare a «Stress» non è allora faci¬ 
le: bisogna sempre avere un occhio 
sugli stati e riflessi pronti per muovere 
il cursore verso il posto migliore, cioè 
quello che fa alzare lo stato più basso 
senza far alzare gli stati che già sono 
alti. Un gioco di strategia, dunque, e 
di buon senso. 

Ad esempio, se il gioco termina per 
mancanza di divertimento mentre 



L’autore va sopra la media 


V 1 i è laureato in fisica nel 1981, 
O specializzandosi in software 
di base e compilatori, si è occupa¬ 
to di software quality control e 
metodologia alla Etnoteam, è au¬ 
tore di svariati corsi di Pascal (è 
suo anche quello pubblicato su 
Applicando) e, attualmente, si 
occupa di intelligenza artificiale 
presso la direzione centrale delle 
ricerche della Italtel. Eppure 
Alessandro Mazzetti, 27 anni, 
una delle più grosse soddisfazioni 
della sua carriera l’ha avuta gio¬ 
cando a un videogame: quello 
realizzato da lui e presentato in 
queste pagine: Stress. 

Si tratta di un gioco didattico di 
simulazione e di strategia con in¬ 
terfaccia grafica, destinato a chi 
ha un calcolatore in casa (attual¬ 
mente è disponibile per l’Apple 
II plus, con scheda Pascal, e per 
l’Apple Ile) e, come dice l’auto¬ 
re, è «un videogame intelligente, 
che richiede al giocatore una par¬ 
tecipazione attiva». Ma come si 
diventa, sia pure per hobby, pro¬ 
grammatori di videogiochi? E 
quali conoscenze deve possedere 
chi intende cimentarsi nell’im¬ 
presa? Applicando l’ha chiesto 
ad Alessandro Mazzetti 
Domanda — Perché ha deciso di 
realizzare un videogame? 
Risposta — Il primo l’ho creato 
per puro divertimento, spinto so¬ 
prattutto dal desiderio di giocare 
con qualche amico a un gioco fat¬ 
to da me. Poi le soddisfazioni ot¬ 
tenute hanno aumentato la mia 
passione, spingendomi a realiz¬ 
zare programmi sempre più sofi¬ 
sticati. 

D. Per trasformarsi da giocato¬ 
ri in autori è necessaria una pre¬ 
parazione particolare? 

R. Per sviluppare un videoga¬ 
me senza troppe pretese è suffi¬ 
ciente conoscere un qualsiasi lin¬ 
guaggio di programmazione. Se 
si vuole superare lo stadio dilet¬ 
tantistico, però, diventano fon¬ 
damentali precisione e perfezio¬ 
nismo: il programma deve, infat¬ 
ti, essere continuamente limato e 
modellato, per renderlo piacevo¬ 
le e tecnicamente perfetto. Fon¬ 
damentale, poi, è l’esecuzione di 


una serie di test, da compiere os¬ 
servando di nascosto le reazioni 
delle persone impegnate con il 
neonato gioco, per captarne le 
reazioni e individuare pregi e di¬ 
fetti del programma. 

D.I suoi giochi privilegiano l’a¬ 
spetto ludistico o quello didat¬ 
tico? 

R. In un primo tempo preferi¬ 
vo puntare sull’aspetto ludistico: 
poi mi sono reso conto che ogni 
videogame è ripetitivo e finisce, 
fatalmente, per stancare i gioca¬ 
tori. Da questa constatazione è 
nata la mia passione per i giochi 
didattici, quelli cioè da cui si può 
imparare qualcosa per allargare i 
propri orizzonti. 

D. Quanti punti riesce a fare a 
Stress? 

R. Nonostante le centinaia di 
partite fatte, rimango un giocato¬ 
re appena sopra la media, soprat¬ 
tutto se messo a confronto con 
alcuni ragazzini dotati di un’agili¬ 
tà eccezionale. Del resto Stress, 
come tutti i giochi che si rispetta¬ 
no, non può per definizione ave¬ 
re punti deboli o strategie vincen¬ 
ti a priori. Proprio per questo 
motivo, nemmeno l’autore può 
avvantaggiarsi in modo decisivo 
rispetto agli altri giocatori. 
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eravamo al lavoro avremo un punteg¬ 
gio piuttosto basso, in quanto non è 
certo piacevole finire le vacanze an¬ 
noiato lavorando. 

È possibile, anche, ottenere anche 
una disposizione dei posti non casuale 
(premendo %). 

Dopo aver visto il gioco «Estate», 
eccone ora un altro: «Lavoro». Vede¬ 
re Figura 5. 

Questa maschera è strutturalmente 
simile a quella di «Estate» (vedere Fi¬ 
gura 2) in quanto anche qui compaio¬ 
no dei «posti», degli «stati» e un curso¬ 
re. Ciò che cambia è l’interpretazione. 

Qui viene rappresentata la vita 
stressata di un lavoratore alienato dal 
lavoro e dalla monotonia della grande 
città (in «Estate» venivano rappresen¬ 
tate le vacanze). Lo scopo del gioco è 
di passare dalla casa all’ufficio, al ri¬ 
storante ,... per mantenere il più possi¬ 
bile alti gli stati. Se per esempio non si 
andasse mai al ristorante, lo stato «fa¬ 
me» andrebbe a zero e il gioco termi¬ 
nerebbe con un messaggio come quelli 
di Figura 6. 

A «casa» si dorme, quindi il «son¬ 
no» sale. Al «ristorante» si mangia, 
quindi, sale la «fame»; attenzione: il 
nome «fame» è significativo ma non 
molto appropriato. Se la stanghetta è 
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guadagnano per metterli nel «portafo¬ 
glio». 

Attenzione : a proposito del portafo¬ 
glio è importante tener presente che in 
Stress esiste uno stato invisibile privo 
della stanghetta sul video e privo di 
nome. Tale stato è del tutto analogo 
agli stati visibili, ma il fatto di essere 
invisibile rende un po’ più imprevedi¬ 
bile il gioco. In sostanza il giocatore 
deve, istante per istante, ricordarsi 
l’«altezza» dello stato invisibile e fare 


Figura 5. Il gioco «Lavoro». 
Strutturalmente simile al gioco 
«Estate» ma diversamente interpretato. 
I posti (ufficio, casa, cinema, banca e 
ristorante) rappresentano i luoghi più 
frequentati da un lavoratore alienato in 
una grande città. Gli «stati» (felicità, 
fame, sonno, soldi) rappresentano i 
fabbisogni fisici e psichici più 
elementari. 


bassa significa che si ha molta fame e 
quindi che si deve mangiare. 

Al «cinema» ci si diverte, quindi sa¬ 
le la «felicità», ovviamente anche qui 
spendendo soldi. In «ufficio» si guada¬ 
gnano soldi, mentre si abbassa la fa¬ 
me, il sonno e la felicità. Infine la 
«banca»: qui si ritirano i soldi che si 
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Figura 6. La classifica relativa al gioco 
«Lavoro». Si noti la somiglianza con la 
classifica di «Estate»: solo le parole 
sono differenti. Stress memorizza una 
classifica per ogni gioco. Installando 
nuovi giochi vengono 
automaticamente create nuove 
classifiche. 
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in modo di tenere anch’esso il più alto 
possibile. Se lo stato invisibile dovesse 
azzerarsi, il gioco non termina ma ven¬ 
gono soltanto emessi dei «beep». Non 
è uno stato pericoloso, ma è un ele¬ 
mento di vivacità del gioco (in «estate» 

10 stato invisibile non veniva utiliz¬ 
zato). 

Ecco come si usa questo stato invisi¬ 
bile: in «ufficio» i soldi guadagnati 
vengono direttamente accreditati in 
banca, quindi la stanghetta «soldi» 
(che rappresenta il conto corrente in 
banca) si alza. 

Se si va in «banca» e si ritirano i soldi 
dal conto corrente e si mettono nel 
portafoglio, si vede soltanto la stan¬ 
ghetta «soldi» che si abbassa, mentre 
si alza idealmente la «stanghetta invi¬ 
sibile». Quando si va al «ristorante» o 
al «cinema» si paga con i soldi del por¬ 
tafoglio, quindi la stanghetta «soldi» 
non si abbassa. Allora quando si sente 

11 «beep» vuol dire che il portafoglio è 
vuoto, sarà dunque opportuno fare un 
salto in banca. 

Si supponga ora di fare un prelievo 
molto sostanzioso in banca, cioè di ri¬ 
manere molto tempo con il cursore 
fermo nel posto «banca». In questo 
caso si vedrà che lo stato «soldi» scen¬ 
de velocemente e, raggiunto lo zero, 
non fa terminare il gioco ma fa solo, 
emettere dei «beep». Questo stato in¬ 
fatti è uno stato di «non termina¬ 
zione». 

Chi installa 
per gioco 

Molti saranno però stati incuriositi 
dalla possibilità di installare un nuovo 
gioco da parte del giocatore. Installare 
un nuovo gioco significa crearlo dal 
nulla. Partendo da un’idea che si ha in 
testa si dovranno inventare i «posti» e 
gli «stati» del gioco e in qualche ma¬ 
niera inserirli in «Stress», cioè memo¬ 
rizzarli nel dischetto. 

Dal punto di vista operativo, per 
installare un gioco, basta battere un 
nome diverso da quelli listati in Figura 
1. Si entra così in «fase di installazio¬ 
ne», cioè si inizia in colloquio, guidato 
da Stress, in cui il giocatore può inseri¬ 
re tutti i dati del suo nuovo gioco (qua¬ 
li sono gli stati, i posti, i messaggi fi¬ 
nali...). 

Si comincia con il definire il numero 
dei posti, il loro nome e il loro disegno; 
poi si definisce il numero degli stati e il 
loro nome. A questo punto bisogna 
stabilire quale correlazione esiste fra i 
posti e gli stati, cioè come si devono 
muovere le stanghette quando ci si fer¬ 
ma in un posto e infine bisogna defini¬ 


re le parole che compongono il mes¬ 
saggio finale (quello della classifica). 
Per esempio. Si provi a installare un 
gioco di guerra, ambientato nel perio¬ 
do napoleonico. Il gioco dovrà per¬ 
mettere di immedesimarsi in Napoleo¬ 
ne e lo scopo dovrà essere quello di 
scegliere la migliore strategia di guerra 
al fine di vincere il maggior numero di 
battaglie. 

Si avranno a disposizione un eserci¬ 
to di soldati e una fabbrica di munizio¬ 
ni: si dovrà riuscire a prendere il mag¬ 
gior numero di «prigionieri» e ottene¬ 
re il maggior numero di «vittorie». 

Quali sono le decisioni che Napo¬ 
leone può prendere durante una guer¬ 
ra? Fra le tante possibili, se ne scelgo¬ 
no tre significative. Per esempio: 

1) fare «rifornimento» di risorse (re¬ 
clutare soldati e richiedere muni¬ 
zioni); 

2) fare delle «battaglie»; 

3) fare scambi di «prigionieri» col 
nemico. Questi sono dunque i sposti» 
del nuovo gioco. 

Ora si deve stabilire come si modifi¬ 
cano gli stati quando ci si ferma in un 
posto. Si devono cioè definire le rego¬ 
le, che saranno poi formule aritmeti¬ 
che, che governano gli stati. Fatto 
molto importante, perché il successo 
del gioco dipende per la maggior parte 
da queste definizioni. 

In Figura 7 si può vedere un pro¬ 
spetto utile per capire bene la funzione 
delle regole. 

Il significato del prospetto è il se¬ 
guente: quando il cursore si ferma in 
«rifornimento» gli stati «munizioni» e 
«soldati» devono salire. Quando inve¬ 
ce si ferma in «battaglia», allora le 
«munizioni» e i «soldati» devono scen¬ 
dere ma i «prigionieri» e le «vittorie» 
salgono. 

In sostanza, per ogni «posto» esisto¬ 
no più regole: precisamente una per 
ogni «stato» che si modifica. In questo 
prospetto non viene ancora specificato 
di quanto si deve alzare o abbassare 
uno stato. Si osservino ora le frasi che 
compaiono a destra e in basso: queste 
sono relative alla fine del gioco: ven¬ 
gono cioè composte per formare il 
messaggio finale (che eventualmente 
può andare in classifica). 

Per la buona riuscita del gioco è im¬ 
portante verificare che in nessuna riga 
e in nessuna colonna compaiano frec¬ 
ce tutte nello stesso senso, allo scopo 
di evitare che esistano «posti» troppo 
convenienti o troppo pericolosi (in Fi¬ 
gura 7, la colonna «rifornimento» non 
segue questo consiglio, mentre la riga 
«soldati» lo segue). 

Ecco ora la formulazione quantitati- 
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Figura7. Prospetto riassuntivo di un 
gioco. Le righe sono gli «stati», le 
colonne sono i «posti». Nelle 
intersezioni riga-colonna compare una 
freccia che indica la direzione in cui si 
deve muovere lo stato quando il 
cursore è fermo nel relativo posto. Le 
frasi a destra e in basso sono relative al 
messaggio finale e vengono composte 
quando il gioco termina (per 
l’azzeramento del relativo stato). 

va delle «regole», cioè come stabilire 
di quanto si deve alzare o abbassare 
uno stato. Prima di vederne un esem¬ 
pio è necessario capire il meccanismo 
con cui Stress esegue queste regole. 
Quando il cursore si ferma in un dato 
posto, tutte le regole di quel posto 
vengono eseguite in loop, cioè più vol¬ 
te a ripetizione, fino a quando il curso¬ 
re esce dal posto. 

La forma aritmetica di una qualsiasi 
regola è fissa ed è illustrata in Figura 8. 

Una regola è una formula aritmetica 
che modifica il valore numerico di uno 
stato. Tale valore non è altro che il 
numero di punti-video (pixel) che for¬ 
mano la stanghetta dello stato. Su Ap¬ 
ple II esistono 191 punti-video vertica¬ 
li, quindi il valore numerico di uno 
stato può spaziare da 1 a 191. 

Un esempio: si supponga che nel 
posto A sia definita la regola 

stato x = stato x — 2 

e che lo stato x valga 130. 

Quando il cursore si ferma nel posto 
A inizia l’esecuzione in loop di questa 
regola con una velocità di circa 30 ese¬ 
cuzioni al secondo. Sul video si vedrà 
che la stanghetta dello stato x scende 
di 2 punti-video ogni trentesimo di se¬ 
condo (circa), fino a quando il cursore 
non sarà uscito dal posto A. Se si rima¬ 
ne fermi per un secondo nel posto A, 
la stanghetta dello stato x andrà a quo¬ 
ta 70. 

L’aspetto più interessante della for- 
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mula di fig. 8 è resistenza (facoltativa) 
di una dipendenza da un altro stato. 
Ecco come funziona il meccanismo di 
influenza di uno stato y sullo stato x: 

stato x = stato x + 1 + (stato y/30). 

si supponga che lo stato x valga inizial¬ 
mente 130 e che lo stato y valga 80. 

Quando «Stress» esegue questa for¬ 
mula lo stato x viene incrementato di 

1 + (80/30) = 1 + 2 = 3 

punti-video per ogni giro di loop (cioè 
ogni trentesimo di secondo circa). La 
divisione che viene effettuata è una 
divisione con troncamento, poiché 
non è possibile far salire o scendere 
una stanghetta di una frazione di 
punto-video. 

Le costanti c e n (Figura 8) vengono 
definite dal giocatore in fase di instal¬ 
lazione di un gioco e possono essere 
positive o negative; la costante c può 
anche essere nulla. 

Tornando al gioco di Napoleone, 
ecco un esempio completo di regole 
per il posto «battaglia». In Figura 7 si 
vede che in questo posto devono esser¬ 
ci quattro regole: 

munizioni = munizioni — 2 
soldati = soldati - 4 + (vittorie/47) 
prigionieri = prigionieri + 0 
+ (vittorie/35) 
vittorie = vittorie - 1 
+ (munizioni/40) 

La prima regola esprime il fatto che 
lo stato munizioni deve scendere con 
velocità costante. La seconda che i sol- 
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Figura 8. La formula aritmetica (o 
«regola») che Stress esegue per 
modificare uno stato. Per ogni posto ci 
possono essere più formule di questo 
tipo. In fase di installazione di un gioco 
bisogna specificare, per ogni posto, 
quante regole vogliamo e, per ciascuna, 
qual è lo stato x, quanto vale “c”, qual è 
lo stato y (facoltativo) e infine quanto 
vale“n”. 


dati decrescono tanto meno rapida¬ 
mente quanto più le vittorie crescono; 
ciò implica che quando ci si ferma in 
«battaglia» (supponendo che le vitto¬ 
rie siano basse) lo stato soldati decre¬ 
sce dapprima velocemente e poi sem¬ 
pre più lentamente, perché lo stato 
vittorie cresce. Il numero 47 è stato 
scelto perché «suddivide» il video in 4 
parti più o meno esattamente. 

Questa regola esprime il fatto che 
all’inizio della battaglia parecchi sol¬ 
dati rimarranno feriti, mentre poi, 
man mano che si combatte e ci si avvi¬ 
cina alla vittoria, vi saranno sempre 
meno feriti. La vittoria, a sua volta, 
viene ottenuta tanto più in fretta quan¬ 
te più munizioni si hanno a disposizio¬ 
ne. Termina così l’installazione di 
«Napoleone». 

Dal punto di vista operativo l’instal¬ 
lazione consiste in un colloquio guida¬ 
to in cui il giocatore inserisce i nomi 
dei posti, degli stati e, per quanto ri¬ 
guarda le regole, specifica gli stati 
coinvolti (stati x), gli stati correlati 
(stati y) e le costanti (“c” e “n”). Ecco 
un esempio in Figura 9. 

Ovviamente è possibile modificare 
un gioco già installato, attraverso il 
medesimo tipo di colloquio, premen¬ 
do il tasto ”*” durante lo svolgimento 
del gioco. 

Appena installato (o modificato) un 
gioco inizia automaticamente una par¬ 
tita in cui è possibile verificare la cor¬ 
rettezza dell’installazione. Installando 
in modo opportuno un gioco si può 
fare in modo che gli stati non scendano 
automaticamente al passare del tem¬ 
po, ma vengano modificati esclusiva- 
mente dall’esecuzione delle regole. 
Ciò può rendere più realistici alcuni 
giochi in cui il fattore tempo non sia 
influente. 

È possibile anche installare le figu¬ 
re, cioè i disegni associati ai posti: non 
si entrerà in dettaglio su questo argo¬ 
mento. Il procedimento, a grandi li¬ 
nee, è il seguente: si compongono i 
disegni in un text-file in cui ogni carat¬ 
tere “X” rappresenta un pixel bianco e 
ogni altro carattere rappresenta un pi¬ 
xel nero. Si dà poi questo file in pasto a 
un programma di utilità chiamato 
«Stressicon» che prowederà a instal¬ 
lare le figure e a memorizzarle sul di¬ 
schetto. 

In Figura 8 si è vista la forma aritme¬ 
tica di una regola. Il fatto che «Stress» 
esegua in loop le regole, quando il cur¬ 
sore è fermo in un dato posto, permet¬ 
te di ottenere effetti molto particolari 
e interessanti. Per esempio, è possibile 
definire una regola che faccia salire di 
colpo uno stato ad un certo valore e lo 


mantenga fisso: 

stato x = stato x + 100 — (stato x/1). 

Questa formula fa posizionare lo 
stato x a livello 100, infatti il valore 
precedente dello stato x viene elimi¬ 
nato: 


stato x + 100 - (stato x/1) = stato x + 
100 - stato x = 100. 



Figura 9. Un esempio di installazione. 
Stress chiede al giocatore, in un 
colloquio guidato, l’inserimento dei 
nomi dei posti, degli stati e la 
definizione delie regole. È possibile, 
ovviamente, modificare un gioco già 
installato attraverso il medesimo tipo di 
colloquio. 


Se si volesse invece far salire uno 
stato in modo esponenziale si potreb¬ 
be rivere 


stato x = stato x + 0 + (stato x/1). 

Con questa regola lo stato x sale 
lentamente quando è basso e poi, man 
mano che si alza, sale sempre più velo¬ 
cemente. L’altezza dello stato x è pro¬ 
porzionale a 2 elevato alla t dove t è il 
tempo in cui il cursore è fermo nel 
relativo posto. Si provi a calcolarlo: se 
lo stato x vale 1 allora viene incremen¬ 
tato di 1, se vale 2 viene incrementato 
di 2 e sale a 4, quando vale 4 viene 
incrementato di 4 e vale quindi 8, se 
vale N viene incrementato di 2 elevato 
alla N. Ad ogni istante di tempo lo 
stato x viene incrementato di una 
quantità sempre crescente, quindi il 
suo valore dopo t istanti di tempo è 

stato * = 1+ 2 + 4 + 8 + 16 + ... +2 l 

t 

= 2 2‘ = k e 1 

i = 1 

Un’altra regola interessante è quella 
che provoca una crescita asintotica di 
uno stato: 

stati x = stato x + 90 - (stato x/2). 

Si supponga che lo stato x sia basso: 
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con questa regola, esso comincerà a 
salire prima velocemente e poi sempre 
più lentamente fino a fermarsi a quota 
180. Infatti a ogni istante di tempo lo 
stato x viene incrementato di una 
quantità che è la metà dell’incremento 
precedente. Se lo stato x vale 1 verrà 
incrementato di 90 - (1/2) = 90, quin¬ 
di sale a 91 ; a questo punto verrà incre¬ 
mentato di 90 - (91/2) = 90 - 45 = 45 
quindi sale a 91 + 45 = 136, a questo 
punto verrà incrementato di 90 — 
(136/2) = 90 - 68 = 22, e così via. In 
sostanza, l’andamento dello stato x nel 
tempo è il seguente: 

stato x =. 180 _|_ 180 + 

2 4 


180 + 

180 + 

...+ 180 

8 

16 

2' 

= 180 

t 

2 2 _1 
i=1 

= K (1 - e~‘) 


È possibile verificare altre regole in¬ 
teressanti dal punto di vista matemati¬ 
co: per esempio sareste in grado di 
trovare le regole che provocano un an¬ 
damento quadratrico o sinusoidale di 
uno stato? (La soluzione è in Figura 
10 ). 

Se siete appassionati di matematica, 
sareste in grado di scoprire un metodo 
generale per conoscere l’andamento 
dello stato per ogni tipo di regola? 
(Cioè per ogni costante cene per ogni 
legame fra gli stati). 

Da un punto di vista formale si po¬ 
trebbe scrivere una regola come una 
equazione differenziale in cui l’inco¬ 
gnita è una funzione del tempo (stato 
x(t), che d’ora in poi si indicherà per 
semplicità con x(t)). 

Se si considera il tempo come una 
grandezza continua anziché discreta 
(approssimazione del tutto accettabi¬ 
le), allora si potrebbe dire che l’incre¬ 
mento dx è: 

dx(t) = c + (y(t)/n) 

L’andamento dello stato x sarà dun¬ 
que dato dall’integrale nel tempo di 
questa funzione: 

* (t) =Jlo dx (t) dt =/ lo l c + (y (t) /n) dt 

Più facile e più utile è il procedimen¬ 
to inverso. Si supponga di voler instal¬ 
lare un gioco in cui necessiti un certo 
andamento f(t) di uno stato. Come 
trovare la regola che esprima tale an¬ 
damento? Semplice: basta calcolare la 
derivata di tale funzione nel tempo e 
considerarla come incremento dello 
stato x. 


Il manuale 
nel dischetto 

Le modalità operative per l’in¬ 
stallazione di un gioco e delle sue 
figure sono interamente descritte 
nel manuale di Stress: tale ma¬ 
nuale è memorizzato in un file sul 
dischetto ed è visualizzabile (o 
stampabile) semplicemente pre¬ 
mendo in ogni contesto del 
gioco. 

Per ricordarsi i vari comandi è 
sempre disponibile il tasto “?” 
che fa emettere sul video la lista 
completa dei comandi. Lo stesso 
tasto è utilizzabile sia quando 
compare la videata di Figura 1 
che durante lo svolgimento del 
gioco. 


jc (t + dt) = x (t) + d f (*) 

X dt 

Per esempio, si consideri la funzio¬ 
ne quadratica 

f(t) = at 2 + bt + c 

La sua derivata è: 

Figura 10. L’andamento di uno stato nei 
tempo può assumere alcune fra le più 
note forme di funzioni matematiche. 
Poiché le regole vengono eseguite in 
loop, il calcolo del valore di uno stato 
nel tempo comporta la risoluzione di 
una serie aritmetica (o di un integrale). 



dt 

e si ottiene: 

x (t+dt) = x(t) + 2at -I- b. 

Il termine 2at è un termine che deve 
crescere linearmente nel tempo, quin¬ 
di verrà ottenuto da un’altra regola, 
relativa ad uno stato y in cui la funzio¬ 
ne da derivare è f(t) = 2at. 

y (t + dt) = y (t) + 

fUlgj)= y (t) + 2a 
dt 

Ne risulta la regola 
y = y + 2a 

che può essere associata alla regola di 
x:f x (t + dt) = x (t) + y (t) + b 
\y (t + dt) = y (t) + 2a 

Se la si scrive secondo la sintassi di 
Stress si ottiene: 

pc = x + b + (y/1) 

\y = y + 2a 

In Figura 10 in basso compare un 
grafico dello stato x nel tempo con 
andamento quadratico. Il termine b è 
negativo per poter avere il minimo 
della funzione per valori positivi di t. 
Giocando a «Stress» con queste regole 
si noterà che lo stato y sale con velocità 
costante mentre lo stato x dapprima 
scende, poi si ferma ed infine sale. 

Il gioco preinstallato «MATEMA¬ 
TICA», che si può notare in Figura 1, 
contiene tutte le più note funzioni ma¬ 
tematiche: provatelo! 

Si può senz’altro affermare che le 
regole di «Stress» sono uno strumento 
veramente potente per simulare la 
realtà in cui viviamo. Per esempio è 
pensabile l’installazione di un gioco di 
simulazione della teoria dell’evoluzio¬ 
ne di Darwin. Il giocatore si immedesi¬ 
ma in Dio e, fermando il cursore nei 
posti, effettua delle mutazioni geneti¬ 
che in un ecosistema formato da vege¬ 
tali, carnivori, erbivori, insetti (sono 
gli stati). Vi può essere poi un posto 
speciale chiamato «evolvi» in cui ven¬ 
gono eseguite le regole dell’evoluzio¬ 
ne. «Stress» quindi è un gioco didatti¬ 
co: stimola lo studio della matematica, 
della fisica, delle leggi dell’economia, 
dei fondamenti dell’informatica (mac¬ 
chine a stati, algoritmi a loop, ...). Il 
tutto però presentato sotto forma di 
vacanza o di eroi napoleonici o come 
volete voi: è dunque un modo di impa¬ 
rare giocando. 

Alessandro Mazzetti 
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con DOKU-DATA Lampertz! 


DOKU-DATA è «il sistema» universale per l’archi¬ 
viazione di tabulati e documentazioni di programmi 
EDP, studiato per creare ordine e funzionalità in 
qualsiasi ufficio. 

L’elemento chiave del sistema è la cartella DOKU- 
DATA che grazie a due ganci di sospensione latera- 



Esclusivista per l'Italia: SECURDATA s. r. I. . 

Via Statale dei Giovi. 54 - 22070 GRANDATE (CO) 
Tel. 031-450970 ric.aut. Telex 323121 


le e ad uno centrale si adatta a tutti i sistemi di 
archiviazione. Disponibile in una vasta gamma di 
formati, blocca e libera in un baleno programmi e 
tabulati. Può essere utilizzata per tenere a portata di 
mano tale materiale o per archiviarlo con un ottima¬ 
le sfruttamento dello spazio. 



raccoglitore per tabulati 
DOKU-DATA 


I Desidero ricevere ulteriori informazioni e in OMAGGIO un campione della 
. cartella DOKU-DATA. 

Nome___ 

| Cognome____ 

| Ditta__ 

Via__ 

VCAP _^_Città_ 

(Ai 

Tel._-__- 


CANTIANI P&M 































* 

Molte volte è necessario, durante la realizzazione 
di un programma, localizzarne alcuni segmenti. 
Linefinder rende veloce e semplice questa operazione 
ma può essere usato efficacemente per altre applicazioni. 


Memoria 
riga per riga 


S pesso mentre si stanno realizzando 
nuovi programmi si usa il monitor 
per il debug o per localizzare segmenti 
di programma. Il Linefinder (trova ri¬ 
ghe) è stato scritto per rendere molto 
semplice e veloce questo fastidioso la¬ 
voro ma può essere usato anche per 
altre utili applicazioni. 

Prima di esaminare il programma, è 
però utile vedere come Applesoft (la 
quinta puntata del corso sull’uso di 
questo linguaggio e pubblicata a pag. 
39) memorizza in Ram i programmi 
scritti in Basic. 

La struttura 
di Applesoft 

Un programma Applesoft inizia nor¬ 
malmente aH’indirizzo LOMEN (di 
solito $801, dee 2049). Quando si ag¬ 
giungono delle linee il puntatore LO¬ 
MEN viene aggiornato all’ultima loca¬ 
zione del programma in modo da pro¬ 
teggerlo. Ogni linea di programma ha 
una sua struttura ben definita. I primi 
due byte contengono l’indirizzo della 
linea successiva. Altri due byte con¬ 
tengono il numero della linea. 

Le istruzioni contenute nella linea 
iniziando al quinto byte, che contiene 
un comando tokenizzato di Applesoft 
(vedere il manuale a pag. 121, versio¬ 
ne inglese) oppure una variabile. I by¬ 
te bassi sono utilizzati per rappresen¬ 
tare in codice Ascii le lettere che non 
sono parole chiave, i numerali e i sim¬ 
boli. Fine riga è marcata con tre zeri 
consecutivi. 

La memoria riservata alle variabili 
semplici parte da LOMEN e si estende 
verso le locazioni alte, infine si trova la 
memoria per le matrici. 

La memoria riservata alle stringhe 
è, al contrario, allocata da HIMEM a 
scalare verso il basso. La memoria li- 
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bera è localizzata fra i puntatori di fine 
spazio matrici e inizio spazio stringhe. 
Fortunatamente ci sono delle locazio¬ 
ni di memoria in pagina zero che con¬ 
tengono gli indirizzi dei dati più im¬ 
portanti (Figura 1). 

Il puntatore di fine programma non 
fissa esattamente la fine del program¬ 
ma ma a una locazione che è di uno o 
due byte maggiore. Gli indirizzi di pa¬ 
gina zero si possono leggere applican¬ 
do questo comando: 

PRINT PEEK (BYTE BASSO) + 
PEEK (BYTE ALTO) * 256. 
ESEGUENDO <EXEC 
LINEFINDER> 


HEX 

DEC 

PARAMETRI 

67-68 

103-104 

inizio programma 

AF BO 

175-176 

fine programma 

69-6A 

105-106 

LOMEN= inizio 
memoria variabili 
semplici 

6B-6C 

107-108 

inizio memoria 
matrici 

6D-6E 

109-110 

fine memoria 

variabili 

numeriche 

6F-70 

111-112 

inizio memoria 
stringhe 

73-74 

115-116 

HIMEM= fine 
memoria stringhe 


Figurai 

Nel listato 1 è pubblicato il pro¬ 
gramma che crea il Textfile Linefinder 
mentre il listato 2 mostra il program¬ 
ma Lfdr. 

Una volta salvati sullo stesso disco, 
se il programma da analizzare è in me¬ 
moria, il comando <exec linefinder> 
compie queste azioni: 

1) I parametri del programma in 
memoria sono memorizzati in modo 
temporaneo alle locazioni decimali 
1912-1919 e 1146-1149 (linea 40-60). 

2) L’inizio dei puntatori del pro¬ 
gramma viene memorizzato 256 byte 
sotto la fine del programma da analiz¬ 
zare e viene contemporaneamente az¬ 
zerato il byte che precede il nuovo 
punto di inizio (linea 70). 

3) Il comando <run Lfdr> carica il 
programma principale in memoria 
partendo dal nuovo punto di inizio, e 
protegge al tempo stesso il programma 
da analizzare che rimane inattivo ma 
può essere referenziato dalle locazioni 
temporanee. 

Questa zona di memoria è chiamata 
«memoria Ram di scrathpad degli slot 
di espansione»: poiché può essere al¬ 
terata da alcune operazioni di i/o del 


■ 


150 REM ****************** 

151 REM * LINEFINDER * 

152 REM * COPYRIGHT 1984 * 

153 REM * M1CR0SPARC INC * 

154 REM * & APPLICANDO * 

155 REM ****************** 

160 TEXT s CALL - 936: P0KE - 16298,0: P0KE - 16300,0: P0KE - 16368,0 
: G0SUB 1240: G0SU8 1530: G0SUB 1030 
170 HOME : PRINT 'LOCAZIONI DI MEMORIA LINEE DI PROGIWttò' 

175 PRINT '-• 

180 VTAB 4: CALL - 958: INPUT 'NUMERO DI LINEA: ';I$:LI 3 VAL (I$): IF 
1$ = " THEN 180 

190 VTAB 9: HTAB 9: IMMERSE : PRINT 'STO LE6GEND0 IL PRQ6BMP: FOR I * 

1 T0 100: NEXT 
200 60SU8 430: NORMAL 

210 IF FL 3 1 THEN FL 3 0:VT 3 6: 60SU8 980: G0SUB 640 

220 IF FL 3 2 THEN FL 3 0: GOTO 250 

230 VTAB 21: CALL - 958: PRINT 'VUOI LE LOCAZIONI DATI A66IUNTIV1 ?<S/N) 

' » : 6ET 1$: IF 1$ 3 'S' THEN HOME : PRINT 'LOCAZIONE DEI DATI A66IUN 

TIVI ' : PRINT '-*:VT 3 4: 60SU6 980 : 60SUB 

840: GOTO 250 

240 IF 1$ < ) 'N' THEN 230 

250 VTAB 24: CALL - 958: PRINT 'VUOI LA LOCAZIONE DI UN'ALTRA LINEA ?';: 

6ET 1$: IF 1$ 3 'S' THB4 170 
260 IF 1$ < > 'N' THEN HTAB 1: GOTO 250 

270 PQKE 103, PEEK (1912); POKE 104, PEEK (1913): P0KE < PEEK (103) ♦ PEEK 
(104) * 256 - 1),0: POKE 175, PEEK (1146): POKE 176, PEEK (1147) 

280 POKE 111, PEEK (1914): POKE 112, PEEK (1915): POKE 107, PEEK (1916): POKE 

108, PEEK (1917): POKE 105, PEEK (1918): POKE 106, PEEK (1919): POKE 

109, PEEK (1148): POKE 110, PEEK (1149) 

290 TEXT : CALL - 936: POKE - 16298,0: POKE - 16300,0: POKE - 16368,0 

300 VTAB 12: HTAB 7: IMMERSE : PRINT ' FINE PROGRAMMA LINEFINDER ': NORMAL 
: VTAB 23: END 

400 REM - 

410 REM LINEFINDER 
420 REM - 

430 NL 3 START 
440 BL 3 NL 

450 NL 3 PEEK (BL) ♦ PEEK (BL ♦ 1) « 256 
460 IF NL 3 0 AND FIN 3 0 THEN RETURN 

470 IF PEEK (BL ♦ 2) 4 PEEK (BL 4 3) * 256 3 LI AND FIN ( >0 THEN FL 3 
1: RETURN 

480 IF NL 3 0 THEN FL 3 2: VTAB 9: HTAB 2: FLASH : PRINT 'NON POSSO LOCAL 
IZZARE LA LINEA ';LI: NORMAL : RETURN 
490 IF FIN 3 0 THEN TNL 3 TNL 4 1 
500 GOTO 440 

600 REM -— 

610 REM DATI DI LINEFINDER 

620 REM - 

640 VTAB 8: PRINT 'POSIZIONE INIZIALE': VTAB 8: HTAB ( FN HT(BL)): PRINT 
BL:DEC 3 BL: 60SUB 730: VTAB 8: HTAB 32: PRINT HEXS 
650 VTAB 11: PRINT 'POSIZIONE FINALE': VTAB 11: HTAB ( FN HT(NL)): PRINT 
NL - 1:DEC 3 NL - 1: 60SUB 730: VTAB 11: HTAB 32: PRINT HEXt: RETURN 

700 REM --- 

710 REM CONVERSIONE DEC/HEX 
720 REM - 

730 HDH 3 DEC / 256:NBR 3 HDX: GQSUB 760:HBt 3 HEXS 
740 LUX 3 FN MOD(DEC):NBR 3 LDX: 60SUB 760:LB$ 3 HEXS 


56 
















750 HEX* = "*" 4 HB* 4 LB*: RETURN 

760 H7. = NBR / 16 ♦ 1:L7. * NBR / 16iL = LX * 16:LX = NBR - L ♦ 1 
770 HEX* = M1D* 4 MIDI <H*,LX,1): RETURN 

800 REM - 

810 REM DATI AGGIUNTIVI 
820 REM - 

840 VTAB 6: PRINT 'INIZIO PROGRAMMA : " ; s HTAB ( FN HT < START ) ) : PRINT START 
;:DEC » START: 60SUB 730: HTAB 32: PRINT HEX* 

850 VTAB 8: PRINT 'FINE PROGimW:";: HTAB < FN HT<FIN)): PRINT FIN;:DEC = 
FIN: 60SUB 730: HTAB 32: PRINT HEX* 

860 VTAB 10: PRINT -HIMBM:';: HTAB < FN HTOHEN)): PRINT HMEM ; : DEC = HMEM 
: 60SU8 730: HTAB 32: PRINT HEX* 

870 VTAB 12: PRINT "INIZIO MEMORIA STRIN. : HTAB ( FN HT(SRN6)): PRINT 
SRNG; :DEC = SRNG: 60SUB 730: HTAB 32: PRINT HEX* 

880 VTAB 14: PRINT "INIZIO MEMORIA LIBERA:";: HTAB < FN HT<FSP>): PRINT F 
SP;:DEC = FSP: 60SUB 730: HTAB 32: PRINT HEX* 

890 VTAB 16: PRINT "INIZIO MEMORIA ARRAY:";: HTAB < FN HT(ARRAY)): PRINT 
ARRAY;:DEC = ARRAY: 60SUB 730: HTAB 32: PRINT HEX* 

900 VTAB 18: PRINT "INIZIO MEMORIA VAR. ";: VTAB 19: HTAB 2: PRINT "SEMPL 
ICI <=L0MBU:";: HTAB ( FN HT(SVAR)): PRINT SVAR;:DEC = SMR: GOSUB 7 
30: HTAB 32: PRINT HEX* 

910 VTAB 21: PRINT "TOTALE LINEE DI": HTAB 2: PRINT •PRQGfWtW:";: HTAB 2 
5: PRINT 7NL: RETURN 

950 REM - 

960 RB1 DEC/HEX 
970 REM - 

980 VTAB <VT): HTAB 24: CALL - 958: IfWERSE : PRINT "DEC";: HTAB 33: PRINT 
"HEX": NORMAL : RETURN 

1000 REM - 

1010 REM INIZ1AL1ZZAZIONE 
1020 REM - 

1030 VTAB 9: HTAB 11: INVERSE : PRINT ' INIZIALIZZAZIONE ": NORMAL 
1040 DEF FN HT(X) * 28 - LB* < STR* (X)) 

1050 DEF FN MOO(X) * X - INT (X / 256) * 256 

1060 H* * "0123456789ABCDEF" 

1070 START * PEEK (1912) 4 PEEK (1913) * 256 

1080 LI * 0: GOSUB 430:FIN = BL ♦ 1 

1090 SRNG = PEEK (1914) 4 PEEK (1915) * 256 

1100 ARRAY » PEEK (1916) 4 PEEK (1917) i 256 

1110 SVAR = PEEK (1918) 4 PEEK (1919) * 256 

1120 FSP * PEEK (1148) 4 PEEK (1149) « 256 « 1: RB1 FREE SPACE 

1130 MB = PEEK (115) 4 PEEK (116) * 256: RETURN : REM HIMEM 

1200 RB1 - 

1210 DATA PRESENTAZIONE 
1220 REM - 

1240 SS* * " VTAB 4: INVERSE : REM 

b$**2! SPAZI 

1250 TT* * SS*: GOSUB 1330: 60SUB 1330:TT* » ' L1NEFINDER ": 60SUB 
1330:TT* = " BY SMDY MOSSBERG ": GOSUB 1330:TT* = 1 COPYRIGHT 19 
84 ": GOSUB 1330 

1255 TT* * " BY ": GOSUB 1330:TT* = ■ MICROSPARC 

": 60SUB 1330:TT* = " & GOSUB 1330:TT* = " 

APPLICANDO ": GOSUB 1330:TT* = SS*: GOSUB 1330 

1256 NORMAL 

1260 VTAB 16: PRINT "LINEF1NDER FORNISCE LE LOCAZIONI NELLA MEMORIA fttM 
DELLE LINEE DI UN PROGMftt.': PRINT "CARICARE PRIttt IL PR06IWttt DA 
ESAMINAREE DI SEGUITO BATTERE (EXEC LINEFINDER)." 

1270 60SUB 1380: RETURN 
1300 REM - 


NOVITÀ 

BUFFER PER 
QUALUNQUE 
STAMPANTE 
CON STANDARD 
CENTRONICS. 

Memorizza immediata¬ 
mente 8 kbyte in uscita 
dal calcolatore e li invia 
successivamente alla stam¬ 
pante. Potete così usare 
il calcolatore mentre la 
stampante lavora. 

L. 250.000* 


OHM 

C.so Italia, 149 
34170 Gorizia 

VENDITA PER 
CORRISPONDENZA 


PER APPLE 

Drive 5" con doppio 
controller 

L. 770.000 

Drive aggiuntivo 
Interfaccia stampante 

L. 680.000 

St. Centronics 

L. 80.000 

Interfaccia stampante 
Centronics per Epson 
con grafica 

Come sopra per 

L. 130.000 

Centronics 739 
Espansione 16K 

L. 150.000 

Language Card 
Espansione di memoria 

L. 99.000 

Max iram 16K 

L 150.000 

Interfaccia seriale 
bidirezionale RS232C 

L. 160.000 

Stampante Oki 80 
(parallela) 

L. 720.000 

ULTIME NOVITÀ 

Replay scheda per la copiatura 

di tutti i programmi 

L. 188.000 

Per Applé//e 80 colonne 

+ 64 K 

L. 198.000 

* N.B. Tutti i prezzi sono comprensi¬ 
vi di IVA e spese di spedizione. 
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vi am mai munto 




APPLE Ile non finisce qui. Se vi innamorate dell'Apple Ile, vi ri¬ 
cambierà. Dappertutto: in casa, in ufficio, da qualsiasi altra parte. 
Perchè compatto vuol anche dire trasportabile: Apple Ile sta in 
una valigetta 24 ore. 


APPLgHr h 

ma - Apple llcèrmr ^ COme si chia . 

C °J a htto. Pai,/lZ mec * e <*- 
f* un “"co contenitore f mpatt °- ■ 
‘'Persona! computerii Che racch iude 

2 nta ! 0re ’ H discodekMr atore ' r * 

■" ln somma, tutto, ùesde/ siste- 






ATI DI UN COMPUTER? 


APPLE Ile ha tutto per farsi desiderare. Infatti, ha ereditato dalla 
sua famiglia, la famiglia Apple II, la più ampia libreria di programmi 
esistente, ed è dotato del mouse, un accessorio rivoluzionario che 
vi permette di lavorare in maniera semplice ed intuitiva. 





APPLE Ile: una ricchissima dote. Vi ci 
vorrà un po'di tempo per scoprire tutte 
le risorse dell'Apple Ile. Subito sarete in¬ 
cantati dal suo prezzo. E poi... Ma qui 
non c'è rimasto che lo spazio per antici¬ 
parvi le connessioni del suo pannello po¬ 
steriore: Mouse, Joystick e Paddles; Mo¬ 
dem; Visore a pannello piatto, Televiso¬ 
re e Monitor a colori RGB; Monitor; Dri¬ 
ve esterno; Stampanti e Plotter a colori. 
Apple Ile. Il computer che farà innamo¬ 
rare anche voi. 


pppkz computer 

APPLE COMPUTER S.p.A. - MILANOFIORI. PALAZZO Q8. 20089 ROZZANO (MI) 













Dos, se si desidera effettuare interven¬ 
ti in questa zona occorre fare attenzio¬ 
ne a non intervenire su locazioni che 
contenengono parti del programma. 

Caratteristiche 
di Linefinder 

Come si è visto nella sezione delle 
istruzioni, i puntatori alle zone riser¬ 
vate ai dati non sono significativi se 
non viene effettuato un <RUN> del 
programma oggetto prima di utilizzare 
Linefinder. Solo i dati che riguardano 
HIMEM, LOMEN e il numero di ri¬ 
ghe del programma sono valide subito 
dopo il <LOAD> programma og¬ 
getto. 

Inizializzazione 

L’inizializzazione (linee 1000-1130) 
consiste nella definizione di due fun¬ 
zioni e di numerose variabili che im¬ 
piegano la memoria di scrathpad. FN 
HT (X) fornisce il giusto HTAB per la 
formattazione dei dati sullo schermo, 
e FN MOD(X) è la versione in aritme¬ 
tica floating point del comando MOD 
deH’integer. 

La linea 1080 trova Findirizzo della 
Ram dove termina il programma 
(FIN) e il numero totale di linee (LI). 
Il programma per girare richiede sola¬ 
mente tre input. 

Il primo (linea 180) chiede il nume¬ 
ro della linea con un semplice coman¬ 
do di INPUT. In caso di una pressione 
involontaria del tasto <ret> viene ri¬ 
proposta la richiesta. Gli altri due in¬ 
put (linee 230 e 250) richiedono un 
solo carattere essendo implementati 
con il comando GET. Quindi è suffi¬ 
ciente la sola pressione del tasto per 
rendere esecutivo il comando. Gli er¬ 
rori di input sono trattati nelle linee 
240 e 260. 


Come funziona 

Il cuore di Lfdr è la Linefinder sub¬ 
routine (linee 400 — 500). Nelle linee 
430-440 la linea iniziale del program¬ 
ma oggetto è inizializzata con il valore 
di START. 

L’indirizzo iniziale della nuova linea 
(NL) è calcolato nella linea 450 con un 
PEEK dei primi due byte della linea 
corrente. 

La linea 470 calcola il valore della 
linea corrente con un altro PEEK sul 
terzo e quarto byte della linea corren¬ 
te. Se il risultato è uguale alla variabile 


LI, viene settato un flag è il program¬ 
ma riprende alla linea 200. 

La linea 210 mostra i dati sul video 
(Figura 2). 

Se la linea corrente non è quella 
cercata il programma continua a cicla- 


1310 REM STAMPA CBTOWTA 
1320 REM - 


re (LINEA 500) finché non viene loca¬ 
lizzata. 

Se NL diviene eguale a 0, ciò sta a 
significare che è stata raggiunta la fine 
del programma e viene visualizzato il 
messaggio: «La linea XXX non può 


1330 UIDTH = 20 - < LEN <TT$) / 2): 1F UIDTH < = 0 THEN PR1NT TTS: RETURN 

1340 HTAB UIDTH: PRINT TTS: RETURN 

1350 REM - 

1360 REM FINISC1/C0KTINUA 
1370 REM - 

1380 VTAB 23: HTAB 12: PRINT ""ESCé PER FINIRE" 

1390 VTAB 24: PRINT TA6< 8);""SPACEé PER CONTINUARE"; 

1400 PRINT " é";: HTAB 31: GET ZZI: IF ZZ$ = CHRS (27) OR ZZ* * CHR$ < 

3) THB* 270 

1410 IF ZZ* » CHR$ (32) THEN RETURN 
1420 CALL - 868: CALL - 1008: 60T0 1400 

1500 REM - 

1510 REM ISTRUZIONI 
1520 REM - 

1530 HOME 

1540 VTAB 5: CALL - 958: PRINT "VUOI LE ISTRUZIONI <S/N) ? * ; : 6ET 1$: PRINT 
1$: IF 1$ * "S" THEN P0KE 34,2: VTAB 4: CALL - 958: GOTO 1570 
1550 IF ìi < > "N" THEN 1540 
1560 RETURN 

1570 HOME : PRINT "ISTRUZIONI": PRINT "-": PRINT : PRINT "1. ";: 

IWERSE : PRINT "LINEFINDER": N0RMAL : P0KE 32,0: PRINT 

1571 PRINT " TROVA LA LOCAZIOTC DI INIZIO E DI FINEPR06RAHMA NELLA MEM0R 
1A RAM, DELLE LINEB1810RIZZATE, DELL'INIZIO E FINE MB10RIA,DI INIZIO 
SPAZIO MATRICI, INIZIO SPAZIO"; 

1600 PRINT "DELLE STRIN6HE, DI INIZIO VARIABILI SEM-PLICI. FORNISCE IN0LT 
RE LA QUANTITÀ' DIMB10RIA LIBERA E IL NUMERO TOTALE DELLELINEE MEMO 
RIZZATE." * 

1610 VTAB 17: HTAB 1: PRINT "2. ";: 1WERSE : PRINT "PER USARE LINEFINDER 
": N0RMAL : PRINT 

1620 1WERSE : PRINT "A 1 ;: N0RNAL : PRINT " ESEGUITE CON UN <RUN> IL PRO 
6RAMMA" 

1630 INVERSE : PRINT "B";r N0RMAL : PRINT ' DATE UN <EXEC> DI LINEFINDER 

« . 

1635 PRINT " IL VOSTRO PROGRAMMA RESTERÀ' INTATTO." 

1640 6QSU8 1380 
1650 HOME 

1660 PRINT : PRINT " SE IL PROGRAMMA DA ANALIZZARE E' STATO CARICAI 
0 IN MEN0RIA MA NON E' STATO ESEGUITO SI AVRANNO SOLO GLI IN 

IDIRIZZI CORRETTI PER:" 

1670 VTAB 9: PRINT ■ 1) NUMERI DI LINEA" 

1680 PRINT " 2) HIMEM" 

1690 PRINT " 3) LOMEN" 

1700 PRINT " 4) NUMERO DELLE LINEE" 

1705 VTAB 15 

1710 PRINT : PRINT "6LI INDIRIZZI RELATIVI ALLA MB10R1A LIBERA E ALLO 
SPAZIO OCCUPATE DALLE VARIABILI SARAMti) FORNITI SOLO DOPO AV 

ER DATO UN <RUN> AL PRQGRAfUA." 

1720 60SUB 1380: HOME : P0KE 34,0: RETURN 

Listato 1. li programma Textfile Linefinder. 
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60 











essere localizzata». 

Le linee 460-490 sono usate per ini- 
zializzare le variabili FIN e TNL e 
quindi può essere considerata non in¬ 
dispensabile alla routine Linefinder. 

La linea 230, consente all’utilizzato- 


COME CALCOLARE GLI INDI¬ 
RIZZI DI MEMORIA DELLE LI¬ 
NEE DI PROGRAMMA. 

NUMERO DI LINEA: 40 



DEC 

HEX 

LOCAZIONE 
INIZIALE $0838 

2104 


LOCAZIONE 
FINALE $0847 

2119 


VUOI LE LOCAZIONI DEI DATI? 
(S/N) 

N 

VUOI LA LOCAZIONE DI 
UN’ALTRA LINEA? (S/N) 

Figura 2 

LOCAZIONE DATI AGGIUNTIVI 


DEC 

HEX 

INIZIO 

PROGRAMMA $0801 

2049 


FINE 

PROGRAMMA $242E 

9262 


HIMEM $9600 

38400 


INIZIO MEMORIA 
STRIN. $3D42 

15682 


INIZIO MEMORIA 
LIBERA $25D5 

9685 


INIZIO MEMORIA 
ARRAY $24B4 

9396 


INIZIO 

MEMORIA VAR. 
SEMPLICI= 

LOMEM $242F 

9263 


N. TOT. LIN. 
PROGR. 

153 


VUOI LA LOCAZIONE DI 
UN’ALTRA LINEA ? (S/N) 



Figura 3 


10 REM 

11 REM « CQPYRI6HT (0 1984 * 

12 REM * MICRO-SPARC INC. * 

13 REM « & APPLICANDO « 

14 REM IHiHHfHIIHHHHi 

20 DI = CHR$ (13) ♦ CHRI <4):F* = 'LINEFINDER 1 
30 PRIMT WQPBPF$;D$f'WRrTE'F$ 

40 PRIMT 'P0KE 1912,PEEK<103): P0KE 1913,PEEK( 104)sPOKE 1914,PEEK(1U):P0 
KE 1915,PEEK<112)' 

SO PRIMT 'P0KE 1916,PEEK<107); P0KE 1917,PEEK<108):P0KE 1918,PEEK<105):P0 
KE 1919,PEEK(lflé) B 

60 PRIMI 'P0KE 1146.PEEK< 175) : POKE 1147,PEEK< 176)sPOKE 1148.PEEKU09) iPO 


KE 1149,PEEK<1010)* 

70 PRINT 'POKE 103,PEEK<175): POKE 
104)*256-1,0' 

80 PRIMT 'RIJN LFDR' 

90 PRIMT M'CLOSE" 

Listato 2. Il programma Lfdr. 


re la possibilità di accedere ad altri 
dati, in pratica tutti quelli visibili in 
Figura 3. Se si risponde con «No», 
vengono riattivati i puntatori (linee 
270-280), viene resettato il video e vie¬ 
ne visualizzato un messaggio (linea 
300). 

Applicazione 
del Linefinder 

Chi usa questo programma potrà 
avere utili risultati nel caso abbia ne¬ 
cessità di: 

1) Aggiungere a un programma nu¬ 
meri di linea proibiti e subroutine in 
linguaggio macchina. Applesoft infatti 
non accetta numeri di linea maggiori 
di 63999. 

Le aggiunte dovrebbero essere inse¬ 
rite a partire dal byte successivo alla 
fine del programma (il secondo zero 
dei tre che segnano la fine). Bisogna 
calcolare i byte necessari e la posizione 
di inizio della linea da inserire, quindi 
si usano dei POKE per memorizzare i 
dati. 

Ecco un esempio per aggiungere la 
linea 65535 REM a un programma che 
finisce alla locazione decimale 2100: 
POKE 2101,59 (byte basso della pros¬ 
sima linea): POKE 2102,8 (byte alto 
della prossima linea): POKE 2103,255 
(byte basso di 65535): POKE 2104,255 
(byte alto di 65535): POKE 2105,178 
(codice tokenizzato dello statement di 
REM): POKE 2106,0: POKE 2107,0: 
POKE 2108,0 (tre zero di fine pro¬ 
gramma). 

2) Visualizzare i contenuti degli sta- 


104,PEEKU76B1 sPOKE PEEK<1Q3)4PEEK< 


tements di REM. 

Si consideri la linea: 10 REM pippo 
pluto paperino. Per mostrare la linea 
si utilizza, di solito, il comando LIST 
10. Ma così facendo si visualizza anche 
il REM. Il metodo consiste nel calco¬ 
lare la locazione della linea (nel nostro 
caso 2090-2111), aggiungere 6 byte al¬ 
l’indirizzo di inizio (2095) e stampare i 
byte rimanenti: FOR i = 2095 TO 
2111: PRINT CHR$ (PEEK(I- 
));:NEXT. Non è una tecnica racco¬ 
mandabile in termini di correttezza di 
programmazione, ma è di effetto per i 
principianti e inoltre è un ottimo eser¬ 
cizio didattico. 

3) Riparare programmi che siano 
stati danneggiati. 

Se un programma contiene segmen¬ 
ti in linguaggio macchina, spesso capi¬ 
ta che tentativi errati di running dan¬ 
neggino il programma stesso; conse¬ 
guenza spiacevole è vedere durante un 
comando di LIST linee del tipo: 
47344HIMEM:))HlMEM:INIT(CO - 
LOR(COLOR))HINIT ecc. ecc. 

Il danno è spesso localizzato nell’al¬ 
terazione dei byte 1-2 dell’ultima linea 
o nei byte 1-4 della successiva. Con 
Linefinder è facile trovare gli indirizzi 
e entrando in monitor ricostruire i 
puntatori distrutti. 

4) Miglioramento dell’efficienza. 

Il compattamento del programma e 
dei dati è senza dubbio un vantaggio in 
termini di efficienza semprechè non 
comprometta la documentabilità e le 
funzioni del pacchetto applicativo. Li¬ 
nefinder aiuta a trovare il modo più 
sintetico per realizzare un program¬ 
ma. ■ 
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Che cos’è il compilatore? Perché si dice che il linguaggio 
Pascal ha un formato libero? Come è possibile ricordare 
tutte le nozioni contenute in questa serie di articoli? Con i 
diagrammi trasformati nelle carte sintattiche, dimenticare 
il lessico e la sintassi diventa impossibile. 


Compilatore 
in formato libero 


C hi ha letto la prima puntata della 
guida al Pascal ha imparato alcu¬ 
ne cose fondamentali. Addirittura, al¬ 
la fine, è riuscito a realizzare un primo 
piccolo, ma non per questo poco im¬ 
portante, programma in Pascal. Un 
programmino che consente di trasfor¬ 
mare i numeri arabi in romani o vice¬ 
versa. Ora per verificare se le nozioni 
già spiegate sono state assimilate, Ap¬ 
plicando propone un altro semplice li¬ 
stato da battere che questa volta per¬ 
mette di trasformare l’Apple II in una 
rozza calcolatrice da tavolo (Figura 1). 

La prima cosa che si osserva nel 
nuovo listato è che nella parte delle 
dichiarazioni vengono definite quattro 
variabili, due intere X e Y e due di tipo 
carattere chiamate OP e EQ. 

L’istruzione READ (OP, Y, EQ) è 
equivalente a READ (OP); READ 
(Y); READ (EQ), cioè legge tre valo¬ 
ri che devono essere rispettivamente 
un carattere, un numero intero e un 
altro carattere. 

Le parole DIV e MOD sono due 
operatori aritmetici che effettuano ri¬ 
spettivamente la divisione fra interi 
con risultato intero (es. 10 DIV 3=3) e 
il resto della divisione (es. 10 MOD 
3=1). Vedere figura 1. 

L’aver appreso alcune nozioni basi¬ 
lari sulla programmazione in Pascal, in 
molti casi avrà anche fatto sorgere dei 
dubbi. Molti, per esempio, si saranno 
chiesti: «Per quale motivo in Pascal 
non si scrive tutto ben allineato come 
in basic? Cos’è questo misterioso com¬ 
pilatore? A che cosa serve? E quegli 
strani segni che compaiono sempre nei 
manuali Pascal come si usano?». Sco¬ 
po di questo secondo appuntamento è 
dare una risposta a questi interrogativi 


e ad altri ancora. 

Abbiamo parlato di compilatore, 
vediamo ora cos’è e a cosa serve. Un 


PROGRAM CALCOLATRICE; 

VAR X, Y : INTEGER; 

OP, EQ : CHAR, 

BEGIN 
READ (X) ; 

REPEAT 

READ (OP, Y, EQ); 

CASE OP OF 

*+' ; WRITELN(X+Y) ; 

: WRITELN(X*Y); 

7* : WRITELN(X DIV Y); 
WRITELN(X-Y); 

: WRITELN (X*Y DIV 100); 
TT : WRITELN (X MOD Y); 

END; 

READ(X) 

UNTIL X=0 
END. 

Esempio di esecuzione 


s 

4+3=7 


50%320= 160 


10/3=3 


10 M 3=1 


40*30=1200 





Figura 1. Simulazione 
di una calcolatrice da tavolo. 


programma Pascal si scrive con carta e 
matita, poi lo si ricopia in un file usan¬ 
do l’editor (vedere articolo II sistema 
Pascal, Applicando n. 4). A differenza 
del sistema Basic, quando si scrive un 
programma Pascal con l’editor non 
viene fatto alcun controllo da parte del 
sistema (stiamo parlando del sistema 
Ucsd dell’Apple): abbiamo dunque la 
massima libertà di scrivere come vo¬ 
gliamo, partendo dal basso o dall’alto, 
interrompendo quando vogliamo. Un 
programma Pascal è in pratica un testo 
memorizzato in un file: lo chiameremo 
programma in forma sorgente. Ed è a 
questo punto che entra in gioco il com¬ 
pilatore: si tratta di un programma di 
sistema che legge il programma sor¬ 
gente e lo traduce in codice macchina. 
Il compilatore accetta dunque come 
input il file .TEXT e genera il relativo 
file .CODE: quest’ultimo verrà chia¬ 
mato «programma in forma oggetto». 

Il programma in forma oggetto è 
scritto in un codice chiamato P-code, 
che viene interpretato dall’Apple. 
Questo procedimento è schematizzato 
in Figura 2. 

Rispetto al sistema Basic, il Pascal 
offre questi vantaggi: 

1) il compilatore effettua numerosi 
controlli sintattici e semantici; gli unici 
errori che possono esistere in un pro¬ 
gramma in forma oggetto sono solo 
errori logici; 

2) l’esecuzione di un programma è 
più veloce perché il P-code è un lin¬ 
guaggio orientato alle caratteristiche 
della macchina; 

3) si ha una maggiore libertà nella 
stesura del programma in forma sor¬ 
gente perché l’editor non effettua con¬ 
trolli; 

4) è possibile sviluppare grossi pro- 
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LUCIA 

CODE 


PROGRAMMA IN 
FORMA OGGETTO 


SYSTEM. 

APPLE 


INTERPRETE 
(■•-•ornando ’X" i 


SYSTEM. 

COMPILER 


COMPILATORE 
(comando "C" ) 


PROGRAMMA 

ESEGUITO 


LUCIA | 

i - h - 

L -- -J 

PROGRAMMA IN 
FORMA SORGENTE 


Figura 2. Iter di un 
programma Pascal. 



Figura 3. Stesura di un programma 
in unità separate e linkate. 


grammi a pezzi compilati separata- 
mente e poi unificati attraverso il lin- 
ker (si dice anche linkati). Vedere Fi¬ 
gura 3. 

Il Pascal ha 
un formato libero 

Parliamo ora di lessico. Perché in 
Basic si scrive tutto ben allineato e in 
Pascal è tutto disordinato? 

In Pascal esistono dei simboli e dei 
separatori. I simboli sono per esempio 
le parole, i numeri, i punti e virgola, il 
due punti uguale, ... 

I separatori sono soltanto il blank 
(spazio bianco) e l’a capo. 

La regola è la seguente: 

1) è obbligatoria la presenza di al¬ 
meno un separatore fra due parole o 
fra una parola e un numero (definire¬ 
mo più avanti il significato di parola; 
per ora attribuiamogli il significato più 
intuitivo) ; 

2) può esserci un numero arbitrario 
di separatori fra due simboli consecu¬ 
tivi. Vediamo subito degli esempi: se¬ 
condo voi è lecito scrivere la seguente 
frase? 


IF A> = 10 THEN X:=X+1; 


Certamente: infatti fra la parola IF e 
la parola A vi è un blank, come fra la 
parola THEN e la parola X. 

Non compare invece il blank fra il 10 
e il THEN, ma ciò è lecito; infatti, 10 
non è una parola quindi non va neces¬ 


sariamente separata dal THEN. 
Vediamo un altro esempio corretto: 


IF 
A 
> = 

10 

THEN 

X 

X 

+ 

1 


Qui compare un a capo dopo ogni 
simbolo: del tutto lecito. 

Ancora: 

IF A > = 

10 

THEN X := X+l; 


Quanti blanks! Beh, la regola dice 
che possiamo usare quanti separatori 
vogliamo. 

Ecco ora alcuni esempi errati: 


IFA> = 10 THEN X:=X+1; 

L’errore sta nella mancanza del 
blank fra IF e A: in questo caso il 
compilatore prenderebbe in conside¬ 
razione la parola IFA e darebbe un 
messaggio del tipo «IFA is an unk- 
nown identifier» (identificatore sco¬ 
nosciuto). 

Lo stesso vale se omettiamo il blank 
fra THEN e X: in questo caso verreb¬ 
be considerata THENX come un’uni¬ 
ca parola. 

Altro esempio errato: 


IF A> = 10 TH EN X:=X+1; 


L’errore è il blank inserito in 
THEN: il compilatore crederebbe che 
TH e EN siano due parole separate e 
le segnalerebbe. 

Ancora: 


I 
F 
A 
> = 

10 

TH^N X:=X+1; 

Qui siamo andati a capo nel bel 
mezzo della parola IF. 
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Figura 4. 

Il compilatore 
come schermo 
fra macchina e uomo. 


-v* 


MACCHINA 

REALE 



SEPARATORI 


PAROLE IDENTIFICATORI 
CHIAVE 


Figura 5. I simboli del 
linguaggio Pascal. 


•■NEW 2 APPLE 

• INTERFACCIA PARALLELA GRAFICA PER STAMPANTE LOW COST 

• INTERFACCIA PARALLELA SUPER PRINT MASTER III incluso cavo 2 mt. soft¬ 
ware, buffer 256 k, eoe. (speficare stampante da abbinare) 

• SUPER PRINT MASTER PER STAMPANTE A COLORI IDS 

• TELERASTER SCHEDA INTERFACCIA PER TELECAMERA (Software di abbi¬ 
namento: GRAFPAK cod. 300) 

• SCHEDA 16 KILOBYTES MEMORY CARD (PASCAL) 

• SINGOLO DRIVE 5” 1/4 140 K 

• SINGOLO DRIVE 5” 1/4 140 K SLIM 

• DOPPIO CONTROLLER PER DRIVE 5” e SLIM 

• DOPPIO DRIVE 80/35 SLIM DOPPIA DENSITÀ, CAPACITÀ TOTALE 655.360 B 
incluso alimentatore switching e doppio controller 

• SOFTWARE PER OPERARE IN PASCAL E CP/M per unità Doppio Drive 80/35 

• DOPPIO DRIVE 80/35 SLIM DOPPIA DENSITÀ, DOPPIA FACCIA capacità totale 

1.2 Megabytes NOV. 83 

• SCHEDA DIGICODER INTERFACCIA PER ENCOOER OTTICI 2 CANALI fino a 
100 MILIONI DI PUNTI - SOFTWARE INCLUSO 

• PROGRAMMATORE DI EPROM, che include SCHEDA PARALLELA I/O FLAT CA¬ 
BLE E SCHEDA PROGRAMMER CON ZOCCOLO (inseribile in contenitore ester¬ 
no dell’APPLE) 

• SCHEDA ESPANSIONE 128 K 

• CONVERTITORE ANALOGICO DIGITALE A12 BIT, 4 CANALI DI INPUT E 4 CON¬ 
TATTI DI RELAIS CON OROLOGIO CALENDARIO 

• CONVERTITORE A/D A12 BIT GUADAGNO PROGRAMMABILE, 2 CANALI IN¬ 
PUT DIFFERENZIALI, AMPLIFICATORE A GUADAGNO PROGRAMMABILE 

• CONVERTITORE A/D 12 BIT VELOCE (25MS) 8 CANALI DI INPUT COMPLETA¬ 
MENTE DIFFERENZIALI, AMPLIFICATORE CON GUADAGNO PROGRAMMABI¬ 
LE 

• SCHEDA 80 COLONNE “ SCREEN MASTER” COMPATIBILE CON TUTTI I LIN¬ 
GUAGGI BASIC, PASCAL, CP/M, FORTRAND, APPLE WRITER, VISICALC, ECC. 

• BUFFER DI LINEA PER STAMPANTE IN CONTENITORE ESTERNO, INCLUSI 
2 CAVI E CONNETTORE - ALIMENTATORE - mod. 16 K CENTRONICS TO CEN¬ 
TRONICS ESPANDIBILE A 48 • 96 K - RS232 - IEEE 488 

• INTERFACCIA SERIALE RS232 DI COMUNICAZIONE CON BAUD RATE SELE¬ 
ZIONABILE, INCLUSO CAVO E DB 25 

• SCHEDA Z80 CP/M INCLUSI 2 VOLUMI E SOFTWARE 

• SCHEDA PAL PER COLLEGAMENTO MONITOR COLORI 

• SCHEDA VGP VECTOR GRAPHIC PROCESSOR RISOLUZIONE 512 x 512 PIXEL 
2 PAGINE DI MEMORIA (monocromatica) 

• SCHEDA VGP 64 8 COLORI INCLUSO HOST ADAPTOR 

• SCHEDA VGP 64 64 COLORI INCLUSO HOST ADAPTOR 

• SCHEDA VGP 64 4096 COLORI INCLUSO HOST ADAPTOR 

• OPZIONE PER VGP 64 EXTERNAL SYNC INPUT 

• SOFTWARE DI UTILITIES PER VGP MONICROMATICA 

• SOFTWARE DI UTILITIES PER VGP 64 COLORI 

• SOFTWARE CAPITOL 3 D VISUALISATION 

• SOFTWARE TRISOFT AGE (anche a colori) 

• SCHEDA OROLOGIO CALENDARIO INCLUSI DISPLAY PER KIT cod. 270 

OTT. 83 

• PIASTRA CPU 48 K MEMORIA RAM MICROPROCESSORE 6502 

• TASTIERA ALFANUMERICA CON PAD NUMERICO REPEAT AUTOMATICO SU 
TUTTI I TASTI USCITA ASCII 8 BIT 

• ALIMENTATORE +5-5V, +12-12V.CON FILTRI ANTIDISTURBO TENSIO¬ 
NE ALIMENTAZIONE 220 VOLT 50 HZ 10 AMP. 

• ALIMENTATORE TAMPONE CON BATTERIE RICARICA AUTOMATICA 

• CABINET METALLICO INCLUSO KIT DI MONTAGGIO PER ELAB. 

• MICROELABORATORE APPLE COMPATIBILE COMPLETO MONTATO E COL¬ 
LAUDATO A VENTILAZIONE FORZATA, INCLUSI 3 MANUALI IN ITALIANO 

• PROLUNGA SLOT LUNGHEZZA CA. 15 cm. ABBINABILE A QUALUNQUE SCHE¬ 
DA IN COMMERCIO 

• SCHEDA WILD CARD PER DUPLICAZIONE DISCHETTI PROTETTI 

• GENERATORE DI PATTERN PER DEMO STAMPANTI, PLOTTERS, ECC. IDEA¬ 
LE PER COMPUTER SHOP E FIERE • DA 1 A 4 K EPROM 

• TELECAMERA PROFESSIONALE per SCHEDA TELERASTER ALIM. 220 V. CON 
OBIETTIVO 16 MM. CON DIAFRAMMA 

• SYMBFILE HARD DISK WINCHESTER 5 M. BYTE 

• SYMBFILE HARD DISK WINCHESTER 10 M. BYTE 

• SYMBFILE HARD DISK WINCHESTER 20 M. BYTE 

• SYMBSTORE TAPE STREAMING BACK UP 10 M. BYTE 

• MONITOR FOSFORI VERDI RACK METALLICO 9” 

• MONITOR FOSFORI VERDI RACK METALLICO 12” 

• MONITOR COLORI BARCO INCLUSA SCHEDA INTERFACCIA COLORE 

• PLOTTER WATANABE 6 PENNE FORMATO A 3 

• JOYSTICK CON CAVO DI I/O GAME E DUE INTERRUTTORI 

STAMPANTI OKI SERIE MICROLINE 

• ML 80 (80 cps • 80 cl) SEMIGRAFICA FRIZ. + P. FEED + RULLO PARALLELA 

• ML 82/A (120 cps - 80 cl) SEMIGRAFICA FRIZ. + P. FEED PARALLELA + RS 
232 1200 BAUD 

• ML 92 (160 cps - 80 cl) GRAFICA • N.L.Q. • FRIZ. + P. FEED PARALLELA 

• ML 83/A (120. cps • 132 cl) SEMIGR. FRIZ. + TRATTORE PARALLELA + RS 
232 1200 BAUD 

• ML 93 (160 cps • 132 c^GRAFICA • N.L.Q. ■ FRIZ + TRATTORE PARALLELA 

• ML. 84 (200 cps • 132 cl) GRAFICA 6 N.L.Q. - FRIZ + TRATTORE PARALLELA 

• OPZIONE GRAFICA PER ML 82/A • 83/A INCLUSO MANUALE 

• INTERFACCIA IEEE 488/OKI 

SOFTWARE PERTEL PER APPLE 

• MINUSCOLE E MAIUSCOLE PER APPLE II 

• EDITOR C.N. SOFTWARE TRANSCODIFICA EIA-150 EDITING DI BANDA PER¬ 
FORATA PERFJLETTURA 

• GRAFPAK HARD COPY VIDEO PER STAMPANTI 

• MAILING LIST (1000 NOMINATIVI PER DISCHETTO) 

• CALCOLO AREA CON JOYSTICK PER SCHEDA TELERASTER 

• BIT STICK 1000 POTENTE SOFTWARE GRAFICO INTERATTIVO INCLUSO CON- 
TROLLER E MANUALI IN ITALIANO . 

• SOFTWARE DTOUTPUT PER PLOTTER WATANABE CALCOMP H.P. 

• PACKAGE APPLICATIVO PER ARCHITETTURA 

• PACKAGE APPLICATIVO PER IDRAULICA 

• PACKAGE APPLICATIVO PER ELETTRONICA 

• PACKAGE APPLICATIVO PER CHIMICA 


r^r^rai'Tpr^n periferiche 

■■■ U LSLmJ U LSLEd TELECOMUNICAZIONI 


E se avessimo più statements? Pos¬ 
siamo fare come vogliamo pur che si 
rispettino le due regole: 


X:=X+1;A=0;B=0;IF Z=B THEN 
WRITE(X+2); READ(B); 


Questa sequenza di statements è 
perfettamente corretta: vi sono cinque 
statements in sequenza, separati da un 
punto e virgola e compare il minimo 
numero necessario di blanks. E per gli 
statements innestati, è obbligatorio 
scriverli un po’ più a destra? No ovvia¬ 
mente: è più leggibile ma non è affatto 
obbligatorio. Si può tranquillamente 
scrivere in questo modo: 


PROGRAM AMELIA 

;VAR X: INTEGER; BEGIN READ ( 

X 

) 

: REPEAT 

IF X>0 
THEN 
BEGIN 
X:=X+1 

END;UNTIL X = 0END. 


Riuscite a capire la logica di questo 

programma? Stabiliamo una conven¬ 
zione: nonostante l’estrema libertà 
nella stesura di un programma, per 


motivi di chiarezza e di leggibilità scri¬ 
veremo sempre nel seguente modo: 

1) per gli statements innestati si scri¬ 
veranno due caratteri più a destra ri¬ 
spetto a quello sopra; per esempio: 


WHILE X>0 DO 
X:=X+1; 


2) se un BEGIN serve a concatenare 
gli statements interni a uno statement 
di controllo, lo si scriverà senza andare 
a capo; il relativo END si scriverà alli¬ 
neato con lo statement di controllo: 


WHILE X>0 DO BEGIN 
X:=X+1; 

WRITE(X) 

END; 

IF A=5 THEN BEGIN 

READ(Z) 

END ELSE BEGIN 

K‘ = 1* 

WRITE(Z) 

END; 


3) se una sequenza di statements è 
logicamente connessa, si eviti di anda¬ 
re a capo: 
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A:=0;B:=0;C:=0; 

IF A=Z THEN BEGIN 
A: = 1;B: = 1;C: = 1 
END; 


Sembrano consigli inutili, però, 
quando il vostro programma raggiun¬ 
gerà le 5000 linee e vi saranno innesta¬ 
menti fino al decimo livello, capirete 
l’importanza di aver scritto con ordine 
fin dall’inizio, specie quando dovrete 
scovare un errore. Inoltre, seguendo 
questi consigli, riuscirete a mantenere 
una certa corrispondenza ottica fra il 
programma e il relativo flow-chart, co¬ 
me potete vedere nelle figure 4 e 5 
della puntata precedente. Imparerete 
presto ad abbandonare i flow-charts e 
a programmare direttamente in 
Pascal. 

Andiamo ora un po’ più sul tecnico, 
e vediamo quali sono i simboli del Pa¬ 
scal e cosa vuol dire parola. In Pascal 
esistono 6 tipi di simboli (vedere Figu¬ 
ra 5). 

1) numeri (senza segno) 

2) parole 

3) simboli speciali 

4) stringhe 


(♦Questo e' un commento*) 

PROGRAM AMELIA; (*Bel nome per un programma!*) 
VAR X: INTEGER; 

BEGIN (* Inizio parte istruzioni *) 

READ (X); 

REPEAT (* UNTIL X=0 *) 

X:= X-l+(*Commento dentro una espressione! *)3 ; . 
WRITE ((* Anche qui c'e' un commento*)X) 

UNTIL X=0 ; (*Un commento può' andare 
a capo*) 

WHILE X<5 DO BEGIN 
X:=X+3; 

READ (X); 

IF X<3 THEN BEGIN 
X:=X-1 ; 

WRITE (X) 

END (*IF*) 

END (*WHILE*) 

END.(* PROGRAM*) 

Figura 6. Esempi di Commenti. 


sintattico. I numeri interi sono una se¬ 
quenza di cifre; i numeri reali devono 
contenere o il punto decimale o il sim¬ 
bolo di esponente E (vedere la carta 
sintattica in Figura 9). Esempi di nu¬ 
meri reali sono: 


10.33 

0.0 

1.0E+3 

242E-8 

6000 

8E0 


Il simbolo E significa «per 10 alla». 
Per esempio, 1.0E+3 significa 1000, 
cioè uno virgola zero per dieci alla ter¬ 
za. Attenzione: un numero reale è un 
simbolo, quindi non mettetevi dei 
blanks in mezzo. (Esempio di errore: 
1.0 E+3). 

Dagli esempi precedenti si può de¬ 
sumere che: 1) il punto o la E non sono 
obbligatori; ma è obbligatorio che ci 
sia almeno uno dei due; 2) il segno 
dopo la E non è obbligatorio; 3) gli 
zeri hanno l’usuale significato: 1.0 è 
equivalente a 0001.0 oppure a 1.000; 
4) i numeri reali sono differenti dai 
numeri interi sia dal punto di vista del 
calcolo che dal punto di vista dell’oc¬ 
cupazione di memoria. Fate attenzio¬ 
ne, dunque: 1.0 è diverso da 1; 5) è 
obbligatoria almeno una cifra prima 
del punto e almeno una dopo. (Esem¬ 
pi di errore: 1. oppure .1). 

Le parole si dividono in parole chia¬ 
ve e identificatori. Le parole chiave 
sono: 


IF 

WHILE 

ELSE 

REPEAT 

DO 

END 

UNTIL 


Andate a vedere la lista completa su 
un manuale. Il loro significato è fisso e 
non possono essere usate per dare il 
nome, per esempio, ad una variabile. 
Gli identificatori sono i nomi che noi 
diamo alle nostre variabili, al pro¬ 
gramma, alle procedure, ecc. Sono 


5) commenti 

6) separatori 

Esiste una differenza fra i numeri 
interi e i reali. Anche dal punto di vista 



Figura 7. Carta sintattica dello Statement IF. 
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formate da una lettera seguita da zero 
o più lettere o più cifre, in questo 
modo: 


AMELIA 

PIPPO 

CONTATORE 

A 

B 

C12 


testo e il nome di qualcos’altro in un 
altro punto del programma. 

Si fa osservare che esistono alcuni 
identificatori predefiniti, cioè disponi¬ 
bili anche se non sono definiti esplici¬ 
tamente nel nostro programma: 

INTEGER 

REAL 

WRITE 

READ 

READLN 


(la carta sintattica di un identificatore 
compare in Figura 9). 

Il loro significato può non essere fis¬ 
so, come si vedrà nelle prossime pun¬ 
tate. Un identificatore può essere il 
nome di una certa variabile in un con- 


Anche in questo caso, occorre con¬ 
sultare i manuali per i dettagli. 

Ecco ora i simboli speciali: sono tut¬ 
ti i vari simboli di interpunzione come 
la parentesi, etc: 



ESPRESSIONE SEMPLICE 



OPERATORE RELAZIONALE : 


OPERATORE NON 
RELAZIONALE : 





Figura 8. Carte sintattiche 
di Espressione. 


















































































































































































































+ più 
- meno 
>|< per 
= uguale 
> maggiore 
< minore 

>= maggiore o uguale 
<= minore o uguale 
<> diverso 

( 'parentesi tonda aperta 
) parentesi tonda chiusa 
[ parentesi quadra aperta 
] parentesi quadra chiusa 
:= assegnamento 
: due punti 
.. doppio punto 
; punto e virgola 
altro. 

Attenzione: trattandosi di simboli, 
non si possono inserire blanks al loro 
interno. Per esempio : = è il simbolo di 
assegnamento mentre : = sono due 
simboli, il due punti e l’uguale. Anco¬ 
ra, <> è il diverso da, mentre < > 
sono due simboli, il minore e il mag¬ 
giore. 

Occupiamoci ora delle stringhe. 
Una stringa è una sequenza di caratte¬ 
ri fra apici: 


'INSERISCI IL NUMERO E BATTI 
<RETURN>' 


Nelle stringhe i blanks non fungono 
da separatori, ma sono parte della 
stringa. Una stringa non può andare a 
capo. Per rappresentare il carattere 
apice all’interno di una stringa, biso¬ 
gna ripeterlo due volte senza blanks in 
mezzo. Così: 


'ERRORE: LA STAMPANTE E" 
SPENTA.' 

'IL RISULTATO E'" 

E" UN APICE' 


I commenti sono delle frasi inserite 
nel programma orientate al lettore e 
non al calcolatore. I commenti non 
vengono affatto considerati dal compi¬ 
latore: è come se non ci fossero. Pos¬ 
sono comparire dovunque nel pro¬ 
gramma e fungono da separatore. Un 
commento è delimitato da una paren¬ 
tesi tonda e asterisco. Esempi compa¬ 
iono in Figura 6. 


Come fare 

per ricordare tutto? 

Chi si è avvicinato per la prima volta 
al Pascal penserà che tutte queste no- 
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zioni sparate a raffica verranno presto 
dimenticate. È vero. Nemmeno i più 
esperti riescono a ricordarsi tutti i par¬ 
ticolari di un linguaggio artificiale 
(cioè di programmazione, in contrap¬ 
posizione ai linguaggi naturali quali 
l’Italiano, l’Inglese, il Latino, il Giap¬ 
ponese...). Sono stati inventati, per 
l’occasione, degli speciali diagrammi 
riassuntivi che descrivono in maniera 
facile e immediata il lessico e la sintassi 
di un linguaggio (artificiale): si chia¬ 
mano carte sintattiche. 

In Figura 7 appare la carta sintattica 
dello statement IF. Questa carta dice 
che lo statement IF deve essere forma¬ 
to dalla parola IF seguita da una 
espressione, seguita da THEN, segui¬ 
ta o da nulla, o da ELSE e uno state¬ 
ment. Forse avrete già capito il signifi¬ 
cato delle frecce e degli scatolotti, co¬ 
munque vai la pena di rivederlo: 

• ciò che compare negli ovali deve 
comparire nel programma così com’è; 

• ciò che compare nei rettangoli è un 
rimando a un’altra carta sintattica. Per 
esempio, «espressione» significa che lì 
va sostituita la carta sintattica che si 
chiama espressione (vedere Figura 8); 

• il percorso denotato dalle frecce in¬ 
dica un costrutto corretto di simboli; 

• quando una freccia si divide si può 


seguire o un ramo o l’altro. 

Osserviamo per esempio la Figura 
8: cosa dice? Dice che una espressione 
può essere formata da una espressione 
semplice, seguita eventualmente (la 
freccia si divide) da un operatore rela¬ 
zionale e da un’altra espressione sem¬ 
plice. Vediamo ora l’operatore rela¬ 
zionale: è formato da uno dei simboli 
che compaiono dentro gli ovali (=, 
<>, <, 

L’espressione semplice invece è for¬ 
mata da un eventuale segno + o - e 
poi da un operando. Ci possono essere 
anche più operandi, separati da un 
operatore non relazionale. 

Ecco un esempio di espressione 
errata: 

A>3=B 

Per verificare se questa è un’espres¬ 
sione corretta occorre controllare se 
corrisponde a un possibile cammino in 
Figura 8. Consideriamo il simbolo A e 
partiamo da espressione. C’è un ri¬ 
mando a espressione semplice, andia¬ 
mo giù a espressione semplice. Qui 
risulta che ci deve essere o un + o un - 
o un operando. Noi abbiamo una A, 
quindi vediamo se A può essere un 


operando: scendiamo a operando e 
troviamo identificatore. Andiamo in 
Figura 9 e vediamo che un identifica¬ 
tore può essere formato da una sola A; 
quindi fin qui tutto bene. 

L’identificatore è terminato, quindi 
torniamo a operando. Anche questo è 
terminato, quindi torniamo a espres¬ 
sione semplice. Ora vediamo: il pros¬ 
simo simbolo è un >, che non è un 
operatore non relazionale. Quindi 
usciamo anche da espressione sempli¬ 
ce e torniamo in espressione. Da qui 
entriamo in operatore relazionale e 
vediamo che > è un possibile simbolo: 
anche fin qui è tutto corretto. Ora ab¬ 
biamo un 3 e bisogna verificare se que¬ 
sta è una espressione semplice. Scen¬ 
diamo giù fino a operando e vediamo 
che compare numero, quindi anche 3 è 
corretto. Ora abbiamo un =: esso non 
è un operatore non relazionale, quindi 
siamo costretti a uscire da espressione 
semplice e ciò ci costringe ad uscire 
anche da espressione. Il simbolo = 
non ha trovato collocazione seguendo 
i percorsi di espressione: quella non 
era una espressione. Se invece ci fossi¬ 
mo imbattuti in A>3, questa sarebbe 
stata una espressione. 

Molto interessante la carta sintatti¬ 
ca di numero reale in Figura 9: analiz- 
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Figura 11. Stampa di un grafico. 

PROGRAM GRAFICO; 

VAR X,Y : RE AL ; 

[*N : INTEGER ; 

BEGIN 

X .-«0; 

FQR I ^ 1 TO 48 DO (*Uso 48 linee del video*) 

BEGIN 

Y :« SINpQ; (‘Questa e‘ la finzione*) 

N RUOND (19*Y) ♦ 20; (‘Fattore di convetiione*) 

REPEAT 

WRITE ( ' ' )fc (*BJanks per spostare il orare*) 

N - N-l 
UNTO. N * 0; 

WR1TENL ( **' {'Sapete un pt/ito della funzione*) 

X ; . Xfl/16 (*L'inUcvallo [m*1] a**) 

(*rappresentato in 16 line*) 

END 

END. 


Eiempio di etecuzlone 



VIDEO 



zatela bene, vedrete che riassume tut¬ 
to quello che è stato detto qualche pa¬ 
gina addietro a proposito dei numeri 
reali. 

In Figura 10 vediamo una carta sin¬ 
tattica fondamentale per il Pascal: 
nientemeno che la carta dell’intero 
programma e quella dello statement. 
Osservate bene. All’interno di state¬ 
ment compare a sua volta un rimando 
a statement: il Pascal è un linguaggio 
ricorsivo. 

Ma non basta: in statement compa¬ 
re un ramo vuoto (quello più in basso). 
Ciò significa che sono leciti statements 
di questo tipo: 


IF A>0 THEN 
ELSE; 

REPEAT 
UNTIL X=l; 
WHILE Z<>3 DO; 


Divertente, vero? Senza dubbio, 
però è arrivato il momento di prende¬ 
re in mano un bel manuale (il migliore 


è quello autentico di N. Wirth) e diver¬ 
tirsi a guardare le carte sintattiche 
complete del Pascal. Non imparatele a 
memoria: non serve a niente. L’im¬ 
portante è averle sottomano mentre si 
programma e saperle leggere bene. 

Un problema da 
risolvere 

E ora un esercizio. In Figura 11 
compare un programmino che stampa 
il grafico della funzione y=sen(x). Os¬ 
serviamo la dichiarazione di due varia¬ 
bili reali, X e Y, e di due variabili 
intere, I e N. Notiamo anche la funzio¬ 
ne predefinita ROUND che converte 
un valore reale in uno intero, arroton¬ 
dando. A voi scoprire la logica del pro¬ 
gramma. In ogni caso tenete presente 
che il grafico viene rappresentato con 
l’asse delle ascisse verticale e quello 
delle ordinate orizzontale. La funzio¬ 
ne viene rappresentata per un inter¬ 
vallo di X che va da zero a tre. 

Alessandro Mazzetti 
2. Continua 



DISK-SUBSYSTEMS 


Finalmente a disposizione 
due sottosistemi a dischi 
floppy ad alta capacità con 
dimensioni atte a realizzare 
applicazioni professionali 
per aziende di medie 
dimensioni. 


a 10 :10 Mb, 8” 
interfaccia SASI 

P 5 : 5 Mb, 5”Y 4 

interfaccia ST 506 

espandibili fino a 4 unità. 
Dischi estraibili. 

Dotati di opzione t 

multipleport che □ 

permette di collegare 4 § 

personal alla stessa banca- £ 
dati e di realizzare un < 

sistema “multiutente”. < 

Nessuna conversione di 
Software se lavorate in 
Apple DOS, Megados o 
CPM. 


Attach sviluppati anche per IBM PC, SIRIUS 
e altre case. 

Consegne per contanti pronte da 
magazzino. 

Chiedere informazioni: 


Sig. 


Ditta 


Via 


CAP Città 

Tel. 

CP usato 



EEMERHL RUTOMRTION 

20129 Milano - Via Gaspare Gozzi 1/A 
Tel. (02) 718531 6 linee - Telex 311353 
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IN AUTUNNO 
SBARCANO I MILLE 



Ritagliare, compilare e spedire a: 

Editronica Srl, Corso Monforte 39,20122 Milano. 


Quanti programmi per il tuo 
Apple non conosci ancora? Quali 
applicazioni potrebbero farti 
risparmiar tempo e fatica? 

A settembre escono 
Le pagine del Software. 

Ma conviene ordinarle subito. 


Mille programmi. Duecento pagine. 
Un catalogo completo e aggiornato di 
tutto il software per Apple disponibile 
in Italia. Per ogni programma una 
scheda descrittiva: a cosa serve, a chi è 
destinato, quanto costa, chi lo vende. 

E in più, gli indici analitici: per 
programmi, per area di utenza, per 
produttore. E gli elenchi dei 
rivenditori e dei centri di assistenza. E i 
libri e le riviste utili... Per chi possiede 
un Apple Le pagine del Software sono 
uno strumento indispensabile. Per chi 
non lo possiede ancora, sono una gui 
per scegliere meglio. 

Poi c’è anche il nuovissimo Servizio 
Lettori, il metodo più comodo per chi 
desidera ulteriori informazioni su 
questo o quel programma. Una 
è inserita nel nuovo volume delle 
Pagine del Software. Basta staccarla e 
spuntare i programmi sui quali si 
vorrebbe saperne di più. 


Ordinale subito. 

Sarai fra i primi a riceverle. 
E risparmi 


La prossima edizione delle Pagine del Software 
sarà a casa tua nei primissimi giorni di settembre, 
fresca di stampa, se compili subito e spedisci il 
tagliando qui a fianco. Per favorire gli abbonati 
abbiamo studiato tre possibilità: 1) Non abbonati: 
12.000 lire. 2) Abbonati: 8.000 lire, con un 
risparmio di 4.000 lire. 3) Abbonamento a 6 
numeri di Applicando Dischetto omaggio (Tre 
programmi, oppure l’Indice elettronico delle 
Pagine del Software) le prossime due edizioni delle 
Pagine del Software : 40.000 lire, con un risparmio 
complessivo di 14.000 lire. 


Desidero, senza aggravio di spese postali, Le pagine del Software. Scelgo la seguente formula: 

□ Non sono abbonato. Inviatemi l’edizione di settembre delle Pagine del Software a lire 12.000. 
n Sono abbonato. Inviatemi l’edizione di settembre delle Pagine del Software a lire 8.000. 

□ Mi abbono ad Applicando (□ Rinnovo l’abbonamento). Inviatemi 6 numeri di Applicando il dischetto 
omaggio (□ Tre programmi. □ Indice elettronico delle Pagine del Software.) l’edizione Autunno 

1984 e l’edizione Primavera 1985 delle Pagine del Software a lire 40.000. 

COGNOME E NOME. 


□ Allego assegno non trasferibile di L.intestato a Editronica Srl. 

□ Allego ricevuta di versamento di L.sul CC postale N. 19740208 intestato a Editronica Srl, 

Corso Monforte 39,20122 Milano. 

□ Pago fin d’ora con la mia carta di credito Bankamericard N. 

Data.Firma. 

□ Desidero fattura. Il mio C.Fisc./P.lva è:. 


scadenza 









































Per semplificare il processo di impaccamento 
dei rècord, per recuperare con facilità 
le informazioni dal dischetto sono utili i file 
ad accesso casuale. 

Ecco come si creano, si leggono, si scrivono. 


Quando l’accesso 
è casuale 
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Q uando si programma in Basic 
molti consigliano di usare le tec¬ 
niche della programmazione struttu¬ 
rata, e indicano delle subroutine per 
ottenere la modularità, importante 
davvero per avere un programma ben 
strutturato. In questa puntata della 
guida all’Applesoft, Applicando pre¬ 
senta vari moduli del genere, adatti ad 
essere impiegati in tutti quei program¬ 
mi che richiedano file ad accesso ca¬ 
suale. Per praticità i vari listati che 
corredano l’articolo saranno indicati 
come moduli. Due di questi possono 
apparire così come sono in tutti quei 
programmi che utilizzano file ad ac¬ 
cesso casuale. Gli altri servono a sem¬ 
plificare il processo di impaccamento 
dei dati nei record ad accesso casuale 
per recuperare quelle informazioni da 
dischetto in forma utilizzabile. 

Chi ordina i dati 
sul dischetto 

La maggior parte dei programmi 
davvero utili richiede al computer il 
trattamento di una quantità ingente di 
dati. L’esatta natura del trattamento 
dipende dalla specifica applicazione 
che viene intrapresa. Per fare un 
esempio, il trattamento dei dati d’in¬ 
ventario è del tutto diverso da quello 
delle buste paga. Ma tutti i programmi 
del genere hanno un elemento in co¬ 
mune. Ciascuno di essi deve memoriz¬ 
zare i dati da trattare e i risultati del 
trattamento in qualche dispositivo di 
immagazzinamento permanente, in 
modo che si possano ricuperare i dati 
in un momento successivo. 

Per quanto sia possibile impiegare 
le cassette per memorizzare i dati, esse 
sono per la maggior parte delle utiliz¬ 
zazioni pratiche troppo inefficienti e 


inaffidabili. Il floppy disk supera en¬ 
trambi questi problemi. 

Molti probabilmente hanno comin¬ 
ciato la loro esperienza di personal 
computer usando le cassette per me¬ 
morizzare i dati, per perfezionare alla 
fine il sistema dotandolo di un drive 
per i floppy disk. Chi lo ha fatto è 
rimasto indubbiamente stupito dalla 
maggior velocità con la quale si pote¬ 
vano estrarre dai dischetti i record. Se 
poi si hanno due drive, i vantaggi e la 
velocità sono facilmente immaginabi¬ 
li. Può darsi che qualcuno, che è passa¬ 
to dalle cassette ai floppy disk, utilizzi 
ancora i file ad accesso sequenziale sui 
suoi nuovi dischetti. L’accesso se¬ 
quenziale funzionava bene sulle cas¬ 
sette (che non davano altra scelta) e 
funziona ancor meglio adesso sui di¬ 
schetti. E allora perché prendersi il 
disturbo delle procedure dei file ad 
accesso casuale? 

Ebbene, se si è rimasti soddisfatti 
dall’accresciuta efficienza quando si è 
passati dalla memorizzazione su cas¬ 
setta a quella su dischetto, si sarà an¬ 
cor più contenti dopo aver trasformato 
in file ad" accesso casuale i propri file 
dati. Il motivo è molto semplice. Per 
accedere a un record in modo sequen¬ 
ziale il computer deve leggere tutti i 
record partendo dall’inizio del file fino 


a che giunge al record voluto. 

Questo perché ciascun record di un 
file sequenziale può consistere di qual¬ 
siasi numero di caratteri, di modo che 
il computer non ha alcuna possibilità 
di predire in quale punto esatto del 
dischetto verrà trovato il record desi¬ 
derato. Per inserire nel file nuovi re¬ 
cord è necessario riscrivere l’intero fi¬ 
le. La cancellazione di vecchi record 
lascia nel file uno spazio vuoto che può 
essere riempito solo se accade che un 
nuovo record abbia la stessa lunghezza 
di quello cancellato. 

Invece i record di un file ad accesso 
casuale hanno sempre la stessa lun¬ 
ghezza, e questa misura viene comuni¬ 
cata al computer perché determini con 
esattezza dove trovare, per esempio, il 
record 385 e se sa quanto sia lungo 
ciascun record. Il computer può trova¬ 
te quel record quasi immediatamente. 
Inoltre qualsiasi buco formato nel file 
dalla cancellazione di record può esse¬ 
re riempito con nuovi record, dato che 
tutti i record del file hanno una lun¬ 
ghezza tipo. Si può inserire facilmente 
un nuovo record nel vecchio file sem¬ 
plicemente spostando in su di una po¬ 
sizione di record tutti i record superio¬ 
ri per fare posto al nuovo record. 

Il vero vantaggio dell’impiego di un 
disk drive per la memorizzazione dei 
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dati non sta tanto nella sua maggior 
velocità quanto piuttosto nella facilità 
con cui si possono individuare sul di¬ 
schetto specifici dati. L’utilizzo di file 
sequenziali annulla questo particolare 
vantaggio. 

Che cosa 
è necessario 

Il listato 1 (linee 10 e da 9400 a 9470) 
fornisce le istruzioni di programma 
per il primo modulo da inserire in un 
programma ad accesso casuale. Nes¬ 
sun aspetto di questa subroutine sarà 
cambiato. Ogni programma conterrà 
questo assieme di istruzioni esatta¬ 
mente come è raffigurato qui. 

Questa subroutine dà al computer 
qualche informazione essenziale sui fi¬ 
le ad accesso casuale. La prima cosa 
che il computer deve sapere è il nume¬ 
ro dei file ad accesso casuale che si 
intendono usare nel programma. Il 
numero è indicato come elemento Da¬ 
ta nella linea 9600. Per esempio se si 
utilizzeranno nel programma tre disk 
file ad accesso casuale il programma 
avrà queste linee: 


9599 REM SPECIFICHE FILE AC¬ 
CESSO CASUALE 

9600 DATA 3 


La linea 9400 della subroutine del 
listato 1 legge questo elemento di dati 
come F. Tutti gli altri dati del pro¬ 
gramma devono venire dopo la linea 
9700, a evitare che interferiscano con 
gli elementi di dati usati da questa sub¬ 
routine. La linea 9410 utilizza questo 
valore per dimensionare quattro ma¬ 
trici. F$(I) conterrà i nomi di ciascuno 


dei file ad accesso casuale. FR$(I) sarà 
utilizzata dal programma per contene¬ 
re tutti i dati del record corrente del 
file I. FR(I) sarà il numero del record 
corrente del file I, e FL(I) sarà la lun¬ 
ghezza di ciascun record contenuto nel 
file I. 

Le linee da 9420 a 9440 formano un 
loop che viene eseguito ogni volta per 
ogni file che si intende usare (come 
indicato dall’istruzione Data della li¬ 
nea 9600). Ogni file deve essere identi¬ 
ficato con due elementi di dati. Il pri¬ 
mo sarà il nome del file (come appari¬ 
rà nella lista di Catalog) e il secondo 
sarà la lunghezza di record per ciascun 
record di quel file. Può darsi che si 
voglia dedicare una linea Data separa¬ 
ta a ciascun file. In questo caso si po¬ 
tranno avere nel programma queste 
tre linee Data: 


9610 DATA NOMI, 32 
9620 DATA INDIRIZZI, 32 
9640 DATA COMMENTI, 64 


Con gli elementi Data si dice, in 
pratica, al computer che il primo file di 
dati sarà denominato «Nomi» e che 
ogni record di questo file richiederà 32 
byte. Il file numero due sarà intitolato 
«Indirizzi» e avrà record che occupe¬ 
ranno 32 byte. Il file numero tre si 
chiamerà «Commenti» e avrà record 
che conterranno 64 byte. 

Le linee 9450 e 9460 definiscono tre 
costanti stringa che saranno utilizzate 
dalla subroutine presentata nel listato 
2. Le variabili usate per queste costan¬ 
ti sono D$ e DB (I). Attenzione: non 
devono essere usate in altri punti del 
programma. Ecco ora come si stabili¬ 
sce la lunghezza dei record dei file. È 


10 GQSUB 9400 

9298 REM m*«**m**«**m«***m**«#*******M*«***iM#**« 

9399 REM SUBROUTINE PER INIZIALI ZZARE IL PR0GRAM1A DAI DATA 

9400 READ F 

9410 DIM F*(F),FR$<F),FL(F),FR<F) 

9420 FOR I = 1 T0 F 
9430 READ Ff<l),FL(I) 

9440 NEXT I 
9450 D* = CHR$ <4) 

9460 DB$<0> = 'READ ":DB$<1) = "URITE " 

9465 BR$ = " ": REM 10 SPAZI BIANCHI 

9466 BR$ = BR$ ♦ BR$ ♦ BR$ ♦ BR* ♦ BR$:6R* = BR$ ♦ BR$ ♦ BRI ♦ BRI ♦ BRI ♦ 

" ": REM 255 SPAZI BIANCHI 

9470 RETURN 

Listato 1. Questo listato è un modulo generalizzato da usare in qualsiasi 
programma che impieghi le procedure di accesso casuale illustrate in 
questo articolo. Le istruzioni Data che vengono lette dal modulo sono 
descritte nell’articolo. 
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necessario conoscere questi valori per 
le istruzioni Data viste sopra. Si può 
immaginare ogni record come se fosse 
una scheda di cm 7,5 x 12,5 in un picco¬ 
lo schedario di ricette. Ora, su ciascu¬ 
na scheda (ossia in ciascun record) 
possono trovarsi varie voci d’informa¬ 
zioni. Ogni voce occupa un «campo». 
E importante ricordare che in questo 
caso ciascuna scheda dello schedario 
comprende lo stesso numero di campi 
e che le lunghezze e le identità di que¬ 
sti campi sono le stesse da scheda a 
scheda. 

Si immagini che le schede di un de¬ 
terminato schedario siano state 
espressamente stampate con spazi in 
bianco da riempire. Alla sommità del¬ 
le schede c’è una riga di 15 spazi in 
bianco. Sotto di questa vi è una riga di 
22 spazi in bianco, poi una riga di 15 
spazi in bianco e infine una riga che 
contiene due spazi in bianco, una spa¬ 
ziatura e cinque spazi in bianco. Tutte 
le schede sono stampate in maniera 
identica. 

In questo esempio se si utilizzano le 
schede come indirizzario si potrebbe 
intendere che la prima riga corrispon¬ 
da al nome, la seconda alla via, la terza 
alla città e la quarta alla provincia e al 
codice di avviamento postale. Ogni re¬ 
cord comprende cinque campi e ri¬ 
chiede un totale di 15 + 22 -I- 15 + 2 + 
5 = 59 spazi in bianco (ossia byte). 

Il primo passo per determinare la 
lunghezza del record consiste perciò 
nell’accertare con esattezza quali in¬ 
formazioni si ha intenzione di colloca¬ 
re in un singolo record. Ogni voce 
d’informazioni corrisponderà a un 
campo separato. Poi si decide quanti 
caratteri (al massimo) si intendono as¬ 
segnare a ciascun campo. Si sommano 
il numero di caratteri di ogni campo e 
si giunge alla lunghezza del record. 

Per quanto il Manuale DOS del¬ 
l’Apple affermi che la lunghezza di un 
record può avere qualunque dimen¬ 
sione da 1 byte a 32767 byte, a volte si 
possono incontrare problemi. In tutti 
questi casi è ottima cosa scegliere una 
lunghezza di record che sia fattore pari 
di 256. Ciò può essere spiegabile con il 
fatto che il DOS dell’Apple trasferisce 
256 byte alla volta dal dischetto a un 
buffer di memoria nel computer. 

Così si consiglia di attenersi a lun¬ 
ghezze di record che siano potenze di 
2, come 2, 4, 8, 16, 32, 64 e 128. Così 
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9498 REM «HHHiHimHHHKiHHHfilHfilliimiKIHiiHi 

9499 REM SUBROlfTINE PER ACCEDERE AI DISK FILE AD ACCESSO CASUALE 

9500 DAS = D$ ♦ ‘OPEN 1 ♦ F*(F) ♦ ’.L" ♦ STR* <FL<F)) 

9510 PRINT DA$ 

9515 ONERR GOTO 9580 

9520 DA* = D$ ♦ DB*(FA) ♦ F*(F> ♦ '.R' ♦ STF» <FR<F)) 

9530 PRINT DA* 

9540 IF FA = 0 THEN INPUT FR*(F) 

9550 IF FA = 1 THEN PRINT FR*(F) 

9540 PRINT Wj'CLOSE* 

9545 POKE 214,0 
9570 RETURN 

9579 REM ROUTINE DI TRATTAMENTO DELL'ERRORE PER ISTITUIRE UN NUOVO RECOR 
D IN BIANCO 

9580 PRINT D$;'CLOSE':FA = 1 
9582 POKE 214,0 

9585 FR*(F) = LEFT* (BR*:FL(F)) 

9590 6QSUB 9500 
9595 GOTO MiHHI 

Listato 2. Questo modulo provvede all’effettivo trasferimento dei dati dalla 
memoria RAM al dischetto. Occorre cambiare solo la linea 9595 perché il 
modulo funzioni a dovere in qualsiasi programma che utilizzi il metodo 
dell’autore per i disk file ad accesso casuale. Il numero di linea da inserire 
nella linea 9595 deve essere quello della linea che contiene le istruzioni FA 
= O GOSUB 9500 causa originaria dell’errore (l’errore è che non è stato * 
trovato un tale record). 


facendo si ottiene una considerevole 
flessibilità (non si devono riempire 
tutti i byte) e se si deve diminuire un 
campo di uno o due byte per adattarsi 
a uno di quei numeri lo si può fare 
solitamente senza grande perdita. 

Come si 

conservano i dati 

Il listato 2 (linee da 9500 a 9595) 
fornisce il complesso d’istruzioni di sub¬ 
routine che si occupa di tutti gli accessi 
casuali al dischetto. Queste linee, co¬ 
me quelle del listato 1 , appariranno 
nel programma praticamente senza 
cambiamenti, con l’eccezione della li¬ 
nea 9595, per la quale si deve fornire 
un numero di linea. Il set di istruzioni è 
congegnato sia per la memorizzazione 
dei dati sul dischetto sia per il ritrova¬ 
mento dei dati sul dischetto. La diffe¬ 
renza è indicata dal valore del flag di 
operazione, FA. 

La subroutine utilizza diverse varia¬ 
bili che devono essere definite nel¬ 
l’ambito del programma prima che lo 
si possa usare. Alla variabile F deve 
essere assegnato un numero corri¬ 
spondente al numero del file al quale si 
sta accedendo al momento. Se si fosse¬ 
ro chiamati i file come nell’esempio 
(linee da 9610 a 9630), nel momento in 
cui si decidesse di accedere al file 
«Commenti» occorrerebbe per F un 
valore di 3 (corrispondente al file 3). 
Anche FR(F) deve essere definita dal 
programma. Le si deve dare il valore 


che corrisponde allo specifico numero 
di record nel file con cui abbiamo a che 
fare. Infine a FA si deve assegnare un 
valore di 0 se si stanno recuperando 
dati dal dischetto («Read» e «Input») 
e un valore di 1 se si stanno invece 
memorizzando i dati sul dischetto 
(«Write» e «Print»). 

Così, con tre istruzioni di assegna¬ 
zione per dare valori appropriati a F, 
FR(F) e FA, si possono eseguire un 
GOSUB 9500 e recuperare il record 
FR(F) dal file F del dischetto. Il record 
tornerà come FR$(F), con tutti i dati 
di ciascun campo impaccati insieme in 
una lunga stringa. Se si stanno salvan¬ 
do dati su dischetto si devono impac¬ 
care per prima cosa i dati in FR$(F), e 
poi, dopo avere assegnato appropriati 
valori a F, FR(F) e FA, si può eseguire 
un GOSUB 9500, e il record sarà me¬ 
morizzato sul disco. 

La subroutine a linea 9500 com¬ 
prende anche una trappola d’errore, 
nel caso si cerchi di recuperare un re¬ 
cord dal dischetto (FA = 0) usando un 
numero di record che non esiste per 
quel file. Qualora ciò avvenga, la trap¬ 
pola d’errore scriverà un record in 
bianco in quella posizione del file e, 
usando il comando GOTO della linea 
9595, farà tornare il programma all’i¬ 
struzione che aveva chiesto all’inizio 
quel record. Al secondo tentativo ci 
sarà in quella posizione un record 
(contenente spazi bianchi) e il pro¬ 
gramma procederà normalmente. 

Le istruzioni POKE 216,0 sono ne- 
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cessane per contrastare l’impiego del¬ 
l’istruzione ONERR. La loro presen¬ 
za permette al computer di trattare nel 
modo consueto gli errori del pro¬ 
gramma. 

Il listato 3 è un breve programma 
dimostrativo che illustra la forma più 
semplice di accesso casuale, in cui ogni 
record comprende un unico campo. 
Vengono istituiti due file, e il compu¬ 
ter chiede di introdurre un numero di 
file e un numero di record. Poi viene 
chiesto se si vogliano salvare dati (su 
disco) o caricare dati (da disco). Se si 
indica che si stanno salvando dati ver¬ 
rà chiesto di digitare la stringa da sal¬ 
vare. Quando si premerà Return il re¬ 
cord sarà salvato. Se si caricano dati, il 
record specificato (se esiste) sarà ritro¬ 
vato sul dischetto e visualizzato sullo 
schermo. 

Per omogeneizzare 
i record 

La maggior parte delle applicazioni 
richiederà però più di un singolo file 
per ogni record. La subroutine a linea 
9500 funziona a dovere soltanto se de¬ 
ve essere scritto o ritrovato sul dischet¬ 
to un unico record stringa, identificato 
come FR$(F). Per utilizzare questa sub¬ 
routine in situazioni più complesse sa¬ 
rà necessario escogitare un modulo 
che impacchi i dati di ciascun campo in 
un’unica stringa record prima che si 
memorizzino i dati (usando un GO- 
SUB 9500). Così pure si deve scrivere 
una subroutine che accetti FR$(F) co¬ 
me unico record stringa trovato sul di¬ 
schetto e frazioni la stringa negli ele¬ 
menti Data singoli desiderati. 

Per preparare i dati di ciascun cam¬ 
po in modo che possano essere impac¬ 
cati nel record stringa prima che la 
stringa sia salvata su dischetto si deve 
completare ogni elemento dati con 
l’appropriato numero di spazi bianchi, 
in modo che occupi esattamente il nu¬ 
mero massimo di byte che si è deciso 
quando si impostavano le specifiche 
originali del file. 

Un esempio: si è deciso che NMS, 
nome di un cliente, consista di un mas¬ 
simo di 20 caratteri. La linea qui sotto 
completerà qualunque nome rappre¬ 
sentato da NMS con spazi bianchi, 
quanti bastano a fornire una lunghez¬ 
za totale di stringa di 20 caratteri. 


9199 REM SUBROUTINE PER 
SALVARE DATI SU DISCHETTO 

9200 BL$ = SUBROUTINE PER 
SALVARE DATI SU DISCHETTO 
9300 NMS = LEFT$(NM$ + BL$, 20) 


1 REM PROGRAftIA ESEMPLIFICATIVO CHE IMPIEGA DUE DISK FILE DI DATI 

2 REM CIASCUN FILE CONTIENE UN SOLO CAMPO 
10 GOSUB 9400 

20 HOME 

30 BL* = B REM 10 SPA2I BIANCHI 

40 BL* = BL* ♦ BL* ♦ BL* ♦ BL* ♦ BL* ♦ - REM 64 SPA21 BIANCHI 

50 INPUT "QUALE FILE...'jF 

60 IF F ) 2 OR F < 1 THEN 50 

70 INPUT -QUALE RECORD... 1 ;FR<F) 

80 FR*(F) = - 

90 INPUT -SALVA SU DISCHETTO 0 CARICA DA DISCHETTO <S/L)..-;A* 

100 IF A* = -S- THEN 60T0 160 
HO IF A* < > -L- THEN 60T0 90 

119 REM PREPARA A CARICARE DATI DAL DISCHETTO 

120 FA = 0 

130 GOSUB 9500 
140 PRINT FR*(F) 

150 GOTO 50 

159 REM PREPARA A SALVARE DATI SUL DISCHETTO 

160 FA = 1 

170 INPUT "INTRODUCI I DATI CHE VUOI SALVARE...'jFR*<F) 

180 FR*<F) = LEFT* <FR*<F) ♦ BL*,FL(F)) 

190 GOSUB 9500 

200 PRINT *1 DATI SONO MEMORI22ATI." 

210 GOTO 50 

9398 REM hhihhhhhhìhihìhìkhhhhi 

9399 REM SUBROUTINE PER INI2IALI2ZARE I DATI DEL PR06RAM1A 

9400 READ F 

9410 DIM F*<F),FR*<F),FL<F),FRCF) 

9420 F0R I = 1 T0 F 
9430 READ F*<1),FL(I) 

9440 NEXT I 
9450 D* = CHR* (4) 

9460 DB$(0) = "READ "sDB*<l) = "URITE " 

9470 RETURN 

9498 REM hìhhhhìhhhhhhìhìihìhh 

9499 REM SUBROUTINE PER ACCEDERE AI DISK FILE AD ACCESSO CASUALE 

9500 DA* = DI ♦ -OPEN • ♦ F*(F) ♦ ",L- ♦ STR* (FL(F)) 

9510 PRINT DA* 

9515 ONERR 60T0 9580 

9520 DA* = D* ♦ D8*<FA) ♦ F*(F) ♦ -,R- ♦ STR* (FR(F)) 

9530 PRINT DA* 

9540 IF FA = 0 THEN INPUT FR*<F) 

9550 IF FA = 1 THEN PRINT FR*<F) 

9560 PRINT D*|-CLQSE- 
9565 POKE 216,0 
9570 RETURN 

9579 REM ROUTINE DI TRATTAMENTO DELL 7 ERRORE PER ISTITUIRE UN NUOVO RECOR 
D IN BIANCO 

9580 PRINT D*;-CL0SE'i PRINT 'NON ESISTE UN TALE RECORD..." 

9582 FA = 1s POKE 

9585 FR*(F) = LEFT* (BL*,FL(F)) 

9590 GOSUB 9500 
9595 60T0 120 

9600 DATA 2 

9610 DATA TEST UNO, 32 
9620 DATA TEST DUE, 64 


Listato 3. Ecco un semplice programma di tenuta dei record ad accesso 
casuale che impiega due file record con un unico campo e le procedure 
generalizzate di accesso al dischetto descritte nell’articolo. 
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BL$ è definito come stringa com¬ 
prendente 20 o più spazi bianchi. Que¬ 
sta stringa è concatenata con NM$, e i 
20 caratteri rimasti, che comprendono 
tutto NM$ assieme al numero occor¬ 
rente di spazi bianchi aggiuntivi, ven¬ 
gono presi e riassegnati a NM$. 

Si devono impiegare linee analoghe 
alla 9300 per ciascun elemento di dati 
stringa messo in campo nel record. I 
dati numerici vengono trattati in ma¬ 
niera analoga, con la sola esigenza che 
il numero venga prima mutato in strin¬ 
ga. Per esempio, può darsi che assie¬ 
me al nome del cliente si sia messo il 
suo numero di identificazione. Se que¬ 
sti numeri vanno da 1 a 9999 sarà ne¬ 
cessario un massimo di cinque byte 
(tenendo conto del segno di numero) e 
i numeri più bassi saranno completati 
con spazi bianchi. Per questa situazio¬ 
ne si può usare la linea 9305. 


potrebbe avere un aspetto come quel¬ 
lo del listato 1. 

Si devono includere altre due su¬ 
broutine (linee 9320-9339 e linee 9340- 
9359) per provvedere a completare e 
impaccare FR$(F) quando si utilizza il 
file numero 2 (F = 2) o il file numero 3 
(F = 3). Queste subroutine verranno 
trattate allo stesso modo della subrou¬ 
tine compresa fra le linee 9300 e 9315 
del listato esemplificativo 1, usando gli 
elementi di dati che appartengono a 
ogni rispettivo file. 

Il vantaggio che si ha usando la rou¬ 
tine generalizzata diventa evidente 
quando si è pronti per salvare i dati su 
dischetto. È stato appena introdotto il 
nome (come NM$) e il numero del 
cliente (come CN) per inserire un nuo¬ 
vo cliente (o per correggere informa¬ 
zioni concernenti un vecchio cliente). 
A questo punto per salvare i dati sul 
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Come si recuperano i dati 

Naturalmente la memorizzazione 
dei dati su disco è solo una metà del 
quadro. Bisogna anche essere in grado 
di recuperare i dati e di visualizzarli o 
stamparli come singoli elementi. La 
subroutine a linea 9500 farà tornare i 
dati dal dischetto come singolo record 
stringa, FR$(F). Per disimpaccare gli 
elementi di dati dal record stringa si 
deve scrivere un modulo di subroutine 
analogo alla routine di impaccamento 
della stringa (linee 9200-9399) descrit¬ 
ta sopra. Per disimpaccare il record 
stringa si usa la funzione MID$, che 
estrae un numero specificato di byte 


9305 CN$ = LEFT$(STR$(CN) + 
BL$, 5) 


In questa linea il numero del cliente 
(CN) viene convertito in stringa utiliz¬ 
zando la funzione STR$. Dato che 
questa stringa può avere da 2 a 5 byte è 
necessario che venga completata con 
spazi bianchi usando lo stesso metodo 
che è stato impiegato nella linea 9310. 
Se si ha veramente poco spazio a di¬ 
sposizione, e il segno di numero non 
ha importanza, lo si può eliminare dal- 
la stringa usando una funzione 
RIGHTS così: 


9305 CN$ = RIGHT$(LEFT$ 
(STR$(CN) + BL$,5),4) 


9199 REM SUBROUTINE PER SALDARE I DATI SU DISCHETTO 

9200 BL$ = * 25 SPAZI BIANCHI ■ 

9210 ON F GOSUB 9300,9320,9340 
9220 FA = 1: GOSUB 9500 

9230 RETURN 

9299 REM IMPARENTO DEL RECORD STRINGA PER IL FILE 1 

9300 m = LEFT$ <NM$ 4 BL$,20) 

9305 CN$ = LEFTS ( STRI (CN) 4 BL*,5) 

Listato 9310 FRS(F) = Mt$ 4 CN$ 

esemplificativo 1. 9315 RETURN 


8999 REM SUBROUTINE PER RECUPERARE DATI DAL DISCHETTO 

9000 FA = 0: GOSUB 9500 

9010 ON F GOSUB 9100,9120,9140 
9020 RETURN 

9099 REM ROUTINE PER DISIMPACCARE DATI PER IL FILE 1 

9100 Mt$ = M1D$ <FR$(F),1,20) 

Listato 9105 CN = UAL < NID$ (FR$(F),21,5)) 

esemplificativo 2. 9110 RETUM 


Una volta completati gli elementi di 
dati si può formare FR$(F) concate¬ 
nandoli fra loro, come nella linea 
9310. 


9310 FR$(F) = NM$ + CN$ 


Naturalmente deve essere stato as¬ 
segnato a F l’appropriato valore che 
indichi a quale fine devono essere as¬ 
sociate queste informazioni. 

Se le linee per impaccare la stringa 
che sono listate qui sopra sono incluse 
in una subroutine richiamata da una 
subroutine generalizzata, intesa a ge¬ 
stire le operazioni di salvataggio di da¬ 
ti su dischetto, un blocco del program¬ 
ma compreso fra le linee 9200 e 9399 


disco, come record numero 57, prov¬ 
vede a tutto la linea qui indicata del 
programma principale. 


220 F = 1:FR(F) = 57: GOSUB 9200 

F sceglie lo specifico file nel quale si 
vuole memorizzare il record. FR(F) 
sceglie il numero di record da memo¬ 
rizzare. Il GOSUB 9200 invia il pro¬ 
gramma alla subroutine «salva i dati su 
dischetto». Dato che F = 1, viene uti¬ 
lizzata per impaccare in FR$(F) le ver¬ 
sioni completate di NM$ e CN la su¬ 
broutine compresa fra 9300 e 9315. Poi 
FA viene impostato su 1 in modo che 
la subroutine a linea 9500 sappia che 
deve memorizzare FR$(F) sul di¬ 
schetto. 


da una determinata stringa, comin¬ 
ciando da una posizione che è possibi¬ 
le scegliere in quella stringa. La forma 
generale della funzione MID$ è: 


X$ = MID$(A$, A, B) 


dove A$ è la stringa su cui operare, A 
è un numero che ci dice dove deve 
avvenire l’operazione (vale a dire 
quanti byte contare dall’inizio di A$ 
prima di cominciare a togliere caratte¬ 
ri) e B è un numero che specifica quan¬ 
ti byte togliere. Per qualsiasi elemento 
dati determinato, B sarà lo stesso nu¬ 
mero usato sopra nella subroutine di 
completamento della stringa. 

Se la parte di dati che viene disim- 
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Listato 4. Il programma 
agenda. 


* 4 »« »•». 

: / * * 5 * 
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paccata è numerica si può utilizzare la 
funzione VAL assieme alla funzione 
MID$ per convertire quella parte nel 
suo equivalente numerico. 

Per recuperare dati dal dischetto si 
istituisca a linea 9000 una subroutine 
generale di recupero dati. Poi si scriva 
una breve subroutine di disimpacca- 
mento per ciascun file, usando le linee 
9100 e 9198. Questo metodo è analogo 
a quello illustrato sopra per il salvatag¬ 
gio di dati su dischetto. Le linee forni¬ 
te nel listato 2 potrebbero essere usate 
con l’esempio trattato nell’articolo. 

Occorrono come in precedenza due 
subroutine aggiuntive (linee 9120- 
9139 e linee 9140-9159) per gestire il 
processo di disimpaccamento dei re¬ 
cord recuperati dai file 2 e 3. L’aspetto 
di queste subroutine sarà analogo a 
quello della subroutine presentata nel 
listato 2 (linee 9100-9119). 

Ora quando si vorrà recuperare dal 
record 86 il nome e il numero del clien¬ 
te si utilizzerà questa linea: 


250 F = 1:FR(F) = 86:GOSUB 9000 


Al ritorno dalla subroutine NM$ e 
CN saranno definiti a dovere per l’uti¬ 
lizzo da parte del programma. 

Naturalmente in un programma 
pratico FR(F) sarà determinato da 
un’istruzione di input da tastiera piut¬ 
tosto che da un’istruzione di assegna¬ 
zione come illustrato sopra, o dal valo¬ 
re di un contatore di loop se si cerca 
nel file uno specifico record. Il punto 
importante è che le sole due voci che 
devono essere specificate dal pro¬ 
gramma principale prima che si esegua 
un GOSUB 9000 per recuperare un 
record sono il numero di file e il nume¬ 
ro di record. Il resto lo fa il pro¬ 
gramma. 

Per realizzare un’agenda 

E ora un esempio pratico: il listato 4 
fornisce un programma utile per costi¬ 
tuire un’agenda che abbraccia un inte¬ 
ro anno. E, data la sua semplicità, an¬ 
che una segretaria inesperta di pro¬ 
grammazione potrà utilizzare il pro¬ 
gramma. Ogni mese viene trattato co¬ 
me disk file di dati separato ad accesso 
casuale. Così quando si indica il nume¬ 
ro di un mese in risposta alla richiesta 
del mese si designa in realtà un nume¬ 
ro di file, F, per l’impiego da parte 
delle routine che gestiscono sul di- 


1 REM PROGRAM DI AGENDA 

2 REM IDEATO DA DAN BISHOP 

3 REM CUSTOM COMP 

10 GOSUB 9400:BL$ = B ': REM 25 SPAZI BIANCHI 

19 REM AS<I) CONTIENE INFQRTOZIONI SUGLI APPUNTAMENTI:T$(I) E' L'ORA. 

20 DIM A$(9),T$(9),D$<6) 

29 REM LEGGE I GIORNI DELLA SETTINW 

30 FOR 1 = 0 TO 6 

40 READ W(I) 

50 NEXT I 

58 REM FWD(X) DETERMINA IL NUMERO DEI 6I0RNJ IN UN MESE. 

59 REM ESIGE Y (AWQ) E M (NUMERO DEL MESE). 

60 DEF FN LY(2) = (M = 2 AND < INT (Y / 4) = Y / 4)) * 29 * (M = 2 AND ( 

INT (Y / 4) < > Y / 4)) » 28 

61 DEF FN L2<2) = <M = 4 OR M = 6 OR M = 9 OR M = 11) * 30 

62 DEF FN LX(Z) = <M = 1 OR M = 3 OR M = 5 OR M = 7 OR M = 8 OR M = 10 OR 

M = 12) * 31 

63 DEF FN ND(Z) = FN LY(Z) ♦ FN L2(Z) ♦ FN LX(Z) 

99 REM ********* PRQGRtfttt PRINCIPALE ************* 

100 GOSUB 200: 

110 IF F = 0 OR YR = 0 THEN* END : REM INTRODUCE LA DATA 
120 Y = YR:M = F: GOSUB 500: REM TROVA GIORNO DELLA SETTINW 
130 GOSUB 9000: REM PROWEDE PA6IW APPUNTAMENTI PER LA DATA 

139 REM RIPETE...FINO A CHE Z$='X' 

140 GOSUB 1100: REM VISUALIZZA PAGINA APPUNTAMENTI 
150 GOSUB 1200: REM EDITA PAGIM APPUNTAMENTI 

160 IF Z$ < ) 'X" THEN GOSUB 900: GOTO 140: REM RIORDINA APPUNTAMENTI 
170 IF EFX THEN EFX = 0: GOSUB 9200: REM SALVA SU DISCHETTO SE EDITATO 
180 GOTO 100 

198 REM ***************************«*********«**********<***** 

199 REM SUBR0UTINE PER INTRODUZIONE DI tfWO, MESE E GIORNO 

200 HOME 

210 INPUT 'QUALE MNQ (ES.1983) OPPURE 0...';YR 

220 IF YR = 0 THEN 290 

225 IF YR < 1983 OR YR ) 1999 THEN 200 


230 INPUT 'QUALE MESE (1-12) OPPURE 0.';F 

240 IF F = 0 THEN 290 

250 IF <F < 1 OR F ) 12) THEN 200 

260 Y = YR:M = F:ND = FN ND(Z) 

270 PRINT 'QUALE GIORNO ( l-'ND').INPUT FR(F) 


280 IF (FR(F) < 1 OR FR(F) > ND) THEN 270 
290 RETURN 

498 REM ****************************************************** 

499 REM SUBR0UTINE CHE DETERMINA IL GIORNO DELLA SETTIMANA DALLA DATA 

500 Y = 1984-.X = 0 

509 REM FINO A CHE Y UGUALE AD ANNO CORRENTE FA... 

510 IF Y = YR THEN 550 

520 X = X 4 365 MY / 4 = INT <Y / 4)) 

530 Y = Y 4 1 
540 GOTO 510 
550 FOR M = 1 T0 12 
560 ND = FN ND(Z) 

570 FOR D = 1 T0 ND 
580 X = X 4 1 

590 IF M = F AND D = FR(F) THEN M = 12:D = ND:X = X - 1 
600 NEXT 
610 NEXT 

620 X = INT ((X / 7 - INT (X / 7) 4 .05) * 7) 
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630 RETURN 

898 REM Hmmit4***«m*ft««m«**ft**«*******ft««««*sft*««**«* 

899 REM SUBROUT1NE PER ORDINARE GLI APPUNTMENTI SECONDO L'ORA 

900 FOR I = 0 TO 7 
910 FOR J = I ♦ 1 TO 8 

920 IF T$(J) > = T$(I) THEN 940 
930 GOSUB 1050 
940 NEXT J 
950 NEXT I 

959 REM RI POSI 2 IONA IN FONDO TUTTI 6LI APPUNTMENT1 CON ORA IN BIANCO 

960 FOR I = 0 TO 7 

970 IF T$(I) ( > 1 1 THEN 1010 

980 FOR J = I ♦ 1 TO 8 

990 IF T$(J) < > ’ 'THEN 60SUB 1050jJ = 9 

1000 NEXT J 
1010 NEXT I 
1020 RETURN 

1048 REM M»m«***««M«*««*****««*«*»*****m*»»*«*«***4***M 

1049 REM SUBROUTINE PER SCMBIARE DI POSIZIONE GLI APPUNTAMENTI 

1050 TI = TÌ(J):TÌ<J) = Ti<l):TÌ(l) = Ti 
1060 Ti = AÌ(J)lAÌ(J) = AÌ<1):AÌ(I) = Ti 
1070 RETURN 

1098 REM «4«4*4«444««44*4«««*«4««4«444«««44««444««««44«««««*«4« 

1099 REM SUBROUTINE PER VISUALIZZARE LA PAGINA DELL'AGENDA 

1100 HOME 

1110 PRINT FÌ(F) B , FR(F) , I "YR" - "DÌ(X) 

1120 PRINT •- B 

1130 FOR I = 0 TO 8 

1150 PRINT I\ , TÌ(I)" - -Aid) 

1160 NEXT I 

1170 PRINT -- - 

1180 RETURN 

1198 REM «4fti444««4«*«444f*«444««««4*44«4*«4444*«44««4*«4**4*4« 

1199 REM SUBROUTINE PER EDITARE L'AGENDA 

1200 PRINT -INTRODUCI IL NUMERO DELLA VOCE DA EDITARE." 

1210 PRINT- (INTRODUCI X PER FINIRE)'; 

1220 INPUT Zi 
1230 Z = VAL (Zi) 

1240 IF Zi = -X- THEN 1340 

1250 IF <2 ( 0 OR Z > 8) OR (2 = 0 AND Zi < > -0") THEN 1200 

1260 HOME 
1270 EF/. = 1 

1280 PRINT 'NUOVA VOCE: ORA... 1 

1290 PRINT "(USA OROLOGIO DI 24 ORE: INTRODUCI COME HH.MU" 

1300 PRINT • =) INPUT TÌ(Z) 

1310 IF LEN (TÌ(Z)) = 0 THEN TÌ(Z) = 1 

1320 PRINT 1 DESCR.. - 1 

1330 PRINT - s> INPUT AÌ(Z) 

1340 RETURN 

8998 REM hìhìhìhhhhhihhhhhhhihihhìhhhhhi 

8999 RB1 SUBROUTINE PER RECUPERARE DATI DA DISCHETTO 

9000 FA = 0: GOSUB 9500 
9010 GOSUB 9100 

9020 RETURN 

9099 REM ROUTINE PER DISIMPACCARE DATI DA RECORD STRINGA FRÌ(F) 

9100 FOR I = 0 TO 8 

9110 Aid) = MIDi (FRÌ(F),25 * 1 ♦ 1,20) 

9120 Tid) = MIDi (FRÌ(F) ,25 » I ♦ 21,5) 

9130 NEXT I 

9140 IF MIDi (FRÌ(F),226,5) = M2345" THEN 9160 
9150 FOR 1 = 0 TO 9:AÌ(I) = BB :TÌ(I) * 1 B : NEXT I 

9160 RETURN 


schetto l’accesso casuale. Ciascun 
giorno viene trattato come record 
comprendente 256 byte. Per sistemare 
un anno intero occorreranno 96K byte 
di memoria, per cui si dovrà dedicare 
la maggior parte di un dischetto alla 
gestione dei propri appuntamenti. 

Il programma è forse un po’ insolito 
per ciò che esige in fatto di file, nel 
senso che tutti i 12 file richiedono lo 
stesso numero di byte (256) e che i 
data record contenuti in ciascun file 
sono formattati nello stesso modo. 
Cosa che semplifica le routine di im- 
paccamento e di disimpaccamento, 
dato che occorre una sola subroutine 
per ognuna delle due funzioni, pur es¬ 
sendoci 12 file. Più comunemente oc¬ 
correrebbe una subroutine separata 
per ciascun file utilizzato. 

Per usare il programma «Agenda» 
occorre prima richiamare la pagina 
corrispondente al giorno che interes¬ 
sa. Lo si fa fornendo l’anno (con l’im¬ 
piego di tutte le quattro cifre), il mese 
(un numero compreso fra 1 e 12) e il 
giorno quando si vedono apparire sul¬ 
lo schermo le richieste di queste voci. 
Il computer tiene conto del diverso 
numero di giorni di ciascun mese, 
compreso il febbraio dell’anno bise¬ 
stile. 

Sulla base di queste informazioni il 
computer calcolerà anche il giorno 
della settimana, per un anno compre¬ 
so fra il 1983 e il 1999. Dato che l’anno 
2000 non sarà bisestile si dovrà appor¬ 
tare una modifica al programma per 
far sì che continui a funzionare dopo la 
data del 28 febbraio 2000. 

Una volta introdotti a dovere l’an¬ 
no, il mese e il giorno il computer vi¬ 
sualizzerà una pagina di calendario 
con lo spazio per nove annotazioni. Le 
posizioni degli appunti sono numerate 
da 0 a 8 e viene chiesto di premere una 
sola cifra (o la lettera X) per smettere. 
Se si sceglie linea in bianco il numero 
che si preme non ha importanza, in 
quanto il computer ordinerà automati¬ 
camente tutte le annotazioni secondo 
l’ora della giornata (se si usa un orolo¬ 
gio di 24 ore), mettendo in fondo le 
annotazioni prive di ora. Se invece si 
modifica un vecchio appunto si preme¬ 
rà il numero corrispondente a quella 
annotazione per potere scrivere su di 
essa. 

Viene chiesto a questo punto di in¬ 
trodurre l’ora dell’appuntamento. Se 
non si intende precisare l’ora si preme 
il tasto Return. In caso contrario, si 
abbia cura di usare un orologio di 24 
ore e di introdurre cinque caratteri. I 
primi due devono corrispondere all’o¬ 
ra, come 09 o 15; il terzo carattere può 
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Un passo più avanti, un gradino 
più su. Per guidare un’automobile 
non serve sapere se i cilindri sono a 
V: basta azionare cambio, volante e 
frizione. 

Per guardare la televisione non 
occorre ricordare le lunghezze d’on¬ 
da delle stazioni: basta schiacciare 


un tasto del telecomando. Per usare 
un personal computer non e necessa¬ 
rio diventare specialisti: basta legge¬ 
re Personal Time. 

Personal Time. Un gradino più su 
ogni mese per inventare, disegnare, 
scrivere, calcolare, organizzare, im¬ 
parare, investire, suonare, collezio¬ 


nare, analizzare, giocare, cataloga¬ 
re, ricordare, gestire, comprare, ri¬ 
sparmiare, vendere e perfino cucinare. 

Personal Time. Un passo avanti 
ogni mese per vivere l’avventura 
delle idee più nuove, per applicare le 
soluzioni più creative, per scoprire il 
piacere di usare un personal computer. 



































Un passo più avanti , un gradino più su 
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essere qualsiasi separatore ammesso 
(non sono ammessi i due punti e le 
virgole: si provi un punto, un segno di 
virgolette, un trattino o una barra). 
Gli ultimi due caratteri corrispondono 
ai minuti. 

Verrà chiesto infine di introdurre la 
descrizione. Per avere un intero anno 
su un unico disco, con nove appunta¬ 
menti per ogni giorno, la descrizione 
deve essere ovviamente breve. Il com¬ 
puter tratterrà infatti solo i primi 20 
caratteri che saranno digitati. 

Quando i nuovi dati saranno termi¬ 
nati, il computer ordinerà la nuova vo¬ 
ce nell’agenda e rivisualizzerà la pagi¬ 
na con gli appuntamenti nel dovuto 
ordine. A questo punto si può intro¬ 
durre un altro appuntamento oppure 
tornare alle richieste della data. Per 
uscire dal programma si introduca uno 
zero per l’anno o per il mese. 

Quando si introduce per la prima 
volta una data che non è stata usata in 
precedenza, il computer non troverà 
sul disco un record per quel giorno. In 
tal caso scriverà un record vuoto e rei- 
nizializzerà il programma. Si digiti una 
seconda volta la data e apparirà la pa¬ 
gina bianca dell’agenda. 


Come gira il programma 

La Figura 1 mostra il diagramma 
d’analisi del programma. Inoltre il dia¬ 
gramma lista i numeri di linea della 
subroutine corrispondente a ciascuna 
funzione. Modularizzando le varie 
funzioni usate, il programma principa¬ 
le diventa una lista di richiami di sub¬ 
routine, come si può vedere nelle linee 
100-180 del listato 4 e nel diagramma 
di flusso in Figura 2. 

La prima cosa che fa il programma 
(linea 10) è eseguire la subroutine a 
linea 9400, la quale dimensiona le ma¬ 
trici che userà la routine di gestione 
dei file e legge gli elementi di dati che 
descrivono al computer i file che si 
stanno utilizzando. Gli elementi ag¬ 
giuntivi di dati da usarsi da parte del 
programma, devono seguire questi de¬ 
scrittori di file, come mostrano i nomi 
dei giorni della settimana (linee 9730 e 
9740) che vengono letti dopo (linee 
30-50). La linea 20 dimensiona A$, 
che conserverà le descrizioni degli ap¬ 
puntamenti di un singolo giorno, e T$, 
che conserva le ore corrispondenti. 

Le funzioni definite dall’utente (li¬ 
nee 60-63) lavorano tutte assieme per 
determinare il numero di giorni conte¬ 
nuto in uno specifico mese per uno 


9198 REM HHHiHHHHiHHIHUHHHiHfHHHHHHHHiH 

9199 REM SUBROUTINE PER MEMORIZZARE DATI SU DISCHETTO 

9200 60SUB 9300 

9210 FA = li GOSUB 9500 
9220 RETURN 

9299 REM SUBROUTINE PER IMPACCARE DATI NEL RECORD STRINGA FRKF) 

9300 FRKF) = Bi 
9310 F0R I - 0 T0 8 

9320 Aid) = LEFTI <A$d) ♦ BLI.20): REM BLI=25 SPAZI BIANCHI 

9330 TI(I) = LEFTI (TKI) ♦ 8LI,5) 

9340 FRKF) = FRI(F) ♦ Aid) ♦ TKI) 

9350 NEXT I 

9360 FRI(F) = FRKF) ♦ '12345' 

9370 RETURN 

9398 REM HHHfHHHilHHIiHHHHHHIIUHHHHUHHOI 

9399 REM SUBROUTINE PER INIZIALIZZARE IL PROBIWHtò DA DATI 

9400 READ F 

9410 DIM FKF),FRKF),FL(F),FR<F) 

9420 F0R I = 1 T0 F 
9430 READ Fld),FLd) 

9440 NEXT I 

9450 DI * CHRI (4) 

9460 DBKO) = "READ 'sDBKl) = 'WRITE' 

9465 BRI =' "i REM 10 SPAZI BIANCHI 

9466 BRI = BRI ♦ BRI ♦ BRI ♦ BRI ♦ BRI:BRI = BRI ♦ BRI ♦ BRI ♦ BRI ♦ BRI ♦ 
- 's REM 255 SPAZI BIANCHI 

9470 RETURN 

9498 REN hhhhhihhhhhhhìhhhhhhhììhhhhhh 

9499 REM SUBROUTINE PER ACCEDERE A DISK FILE AD ACCESSO CASUALE 

9500 DAI = DI ♦ 'OPEN 1 ♦ FKF) ♦ ',L' ♦ STRI (FL(F)) 

9510 PRINT DAI 

9515 0NERR GOTO 9580 

9520 DAI = DI ♦ DBKFA) ♦ FKF) ♦ ',R' ♦ STRI (FR(F)) 

9530 PRINT DAI 

9540 IF FA = 0 THEN INPUT FRKF) 

9550 IF FA = 1 THEN PRINT FRKF) 

9560 PRINT Dlj'CLQSE* 

9565 P0KE 216,0 
9570 RETURN 

9579 REM ROUTINE DI TRATTAMENTO DELL'ERRORE PER ISTITUIRE NUOVO RECORD I 
N BIANCO 

9580 PRINT Dlj'CLOSE'sFA » 1 
9582 P0KE 216,0 

9585 FRKF) = LEFTI <BRI,FL<F) - 1) 

9590 GOSUB 9500 
9595 60T0 130 

9598 REM 

9599 REM SPECIFICHE FILE AD ACCESSO CASUALE 

9600 DATA 12 

9610 DATA 6EMAIQ, 256 

9620 DATA FEBBIttIO, 256 

9630 DATA MARZO, 256 

9640 DATA APRILE, 256 

9650 DATA MG6I0, 256 

9660 0ATA 6IUGN0, 256 

9670 DATA LU6LI0, 256 

9680 DATA A60ST0, 256 

9690 DATA SETTEMBRE, 256 

9700 DATA OTTOBRE, 256 

9710 DATA N0VB1BRE, 256 

9720 DATA DICEMBRE, 256 

9730 DATA DOMENICA, LUNEDI', MARTEDÌ' 

9740 DATA MERCOLEDÌ', 6I0VEDI'.VENERDÌ'.SABATO 
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Figurai. 
Moduli 
funzionati del 
programma 
di Agenda 
mostrato nel 
listato 4. 
Ciascun 
modulo è 
rappresentato 
nel 

programma 
da una 
subroutine 
separata. I 
numeri di 
linea danno 
le specifiche 
locazioni 
assegnate a 
ogni 

subroutine. 


Programma di Agenda 

Obiettivo - Memorizzare e recuperare una lista di appuntamenti 
corrispondente ad un dato giorno qualsiasi dell'anno. 


memorizzazione della 
pagina d'agenda 
su dischetto 


inizializzazione del 
programma lettura dati 
dimensionamento matrici 
definizione funzioni 



linee 200-390 

linee 500-690 

linee 9000-9190 
e 9500-9590 

linee 900-1090 

linee 1100-1190 

linee 1200-1390 


linee 9200-9390 
e 9500-9590 


linee 10-90 
e 9400-9490 


specifico anno. Dopo che sono state 
definite queste funzioni il programma 
dà inizio alla esecuzione, a linea 100 
con un richiamo alla subroutine 200. 



diagramma di flusso riguarda solo le 
linee 100-180 e mostra come i moduli 
di Figura 1 siano collegati fra loro a 
costituire un programma funzionante. 


Questa subroutine gestisce l’jntrodu- 
zione da tastiera dell’anno, mese e 
giorno desiderati per avere una deter¬ 
minata pagina dell’agenda. 

La linea 110 del programma princi¬ 
pale metterà fine allo stesso se il valore 
introdotto per l’anno o per il mese è 0. 
Altrimenti viene eseguita la subrouti¬ 
ne 500, nella quale viene determinato 
il giorno della settimana che corri¬ 
sponde alla data specificata. Ciò viene 
fatto calcolando il numero di giorni fra 
il 1° gennaio 1983 (un sabato) e la data 
specificata. La variabile X viene resti¬ 
tuita da questa subroutine con un valo¬ 
re compreso fra 0 e 6, corrispondente a 
un giorno compreso fra sabato e ve¬ 
nerdì. La linea 620 è essenzialmente 
un’operazione modulo. 

Il programma principale affronta 
ora il problema di recuperare dal disco 
la pagina voluta dall’agenda. I valori 
per F e FR(F) sono stati definiti dalla 
subroutine di introduzione della data. 

Così un semplice GOSUB 9000 
provvede al nostro problema. Se non è 
stato ancora introdotto nulla per la da¬ 
ta in questione, la subroutine di gestio¬ 
ne dell’errore inserirà per quella data 
un record vuoto e riavvierà il program¬ 
ma. Ciò pulisce lo stack puntatori Go- 
sub. Di conseguenza nella linea 9595 
della subroutine di disk file l’istruzio¬ 
ne da usare è semplicemente RUN. 

Una volta recuperato un record 
vengono eseguite in sequenza le su¬ 
broutine 1100 e 1200 (linee 140-150). 
La subroutine 1100 gestisce la visualiz¬ 
zazione della pagina d’agenda, mentre 
la subroutine 1200 offre l’opportunità 
di aggiornare a scelta i campi che ven¬ 
gono visualizzati. La variabile flag, 
EF$, viene usata per indicare se sono 


stati apportati cambiamenti. È posta 
su 1 se ce ne sono stati, su 0 in caso 
contrario. In entrambi i casi si torna al 
programma principale a linea 160. 

Se Z$ non è una X, dopo il ritorno 
dalla subroutine 1200 sicuramente l’o¬ 
peratore vuole ancora lavorare con 
quella pagina. Viene eseguita la su¬ 
broutine 900, la quale non fa che ordi¬ 
nare le annotazioni in agenda secondo 
l’ora e risistema quest’ordine in modo 
che tutte le annotazioni con spazi vuoti 
al posto dell’ora siano poste al termine 
della lista. Poi il programma principa¬ 
le torna in ciclo alla linea 140 per rivi¬ 
sualizzare la pagina aggiornata. 

Quando l’operatore ha indicato che 
un dato display non serve più (Z$ = 
«X») il programma principale esegue 
la linea 170. Se è stato apportato qual¬ 
che cambiamento a quella pagina (co¬ 
me indicato da EF$ = 1) la pagina 
aggiornata viene memorizzata su di¬ 
schetto usando la subroutine 9200. Se 
non sono stati fatti cambiamenti il pro¬ 
gramma torna al punto d’introduzione 
della data, per attendere istruzioni di 
richiamo di un’altra pagina. 

La sola differenza basilare fra le sub¬ 
routine di impaccamento e di disim- 
paccamento usate in questo program¬ 
ma è che, poiché tutti i 12 file di dati 
impiegano record identici, occorre de¬ 
finire solo una routine d’impaccamen- 
to e una di disimpaccamento da usare 
per i valori di F. Oltre a questo cam¬ 
biamento c’è il fatto che i 5 byte finali 
di ciascun record, dopo le nove voci 
degli appuntamenti, sono quelli del 
campo di cinque caratteri 12345. 

Questo campo è presente solo nei 
record con dati scritti. Un record ap¬ 
pena iniziato non avrà questo marca¬ 
tore. Di conseguenza per questi re¬ 
cord nuovi tutti i valori riguardanti i 
descrittori di appuntamento e le ore 
sono posti uguali a spazi bianchi, per 
rimuovere eventuali caratteri estranei 
indesiderati prelevati sul disco. 

Va da sé che qualsiasi utilizzo effica¬ 
ce dei disk file per applicazioni che 
implichino operazioni di gestione di 
data base deve, in ultima analisi, dare 
impiego a procedure di trattamento 
dei file ad accesso casuale, Chi ha fino¬ 
ra evitato i file ad accesso casuale solo 
perché sembrano più complicati dopo 
questo servizio avrà probabilmente 
mitigato i propri timori. 

Oltre a ottenere una migliore effi¬ 
cienza, con la formattazione dei campi 
dati in specifiche lunghezze di campo, 
si possono progettare con maggiore fa¬ 
cilità le visualizzazioni sullo schermo e 
i documenti stampati. 

5. Continua 
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a^Onquanto 


In queste pagine Applicando pubblica i listini prezzi aggiornati 
dei prodotti Apple distribuiti dalla Apple Computer, Via Bovio 
5, 42100 Reggio Emilia. 

Listino in vigore dal 2 maggio 1984.1 prezzi non comprendono 
le spese di installazione. 


APPLE IIC 


Prezzo Prezzo 
IVA esci. IVA comp. 

Apple//c . 2.399.350 2.831.233 

Personal Computer Apple //c: compatto e 
completo. 

Il sistema comprende: 

— memoria da 128 Kbyte RAM e 16 Kbyte 
ROM 

— tastiera italiana professionale 

— visualizzazione dei testi a 80 colonne su 24 
righe 

— grafica ad altissima risoluzione e colore 

— unità a disco da 5”1/4 integrata 

— connettore per unità a disco aggiuntiva 

— due connettori seriali per stampante e 
modem 

— ' uscita video per Monitor B/N 

— uscita video RGB e per visore a pannello 

— modulatore PAL per collegamento al TV 

— software di base residente 

— monitor, disassembler, BASIC esteso AP¬ 
PLESOFT 

— 7 programmi dimostrativi più un disco di 
Utilities. 


UNITÀ VIDEO 

Monitor//c . 365.000 430.700 

Video 9 pollici fosfori verdi per Apple //c. 

Supporto Monitor . 72.000 84.960 

Dispositivo accessorio del Monitor //c che ne 
permette la sistemazione ottimale sul compu¬ 
ter //c consentendone inoltre l’orientamento. 



Prezzo 
IVA esci. 

Prezzo 
IVA comp. 

ALTRE UNITÀ PERIFERICHE 

Hand Controller . 

Due manopole di controllo comprensive di pul¬ 
sante. 

60.000 

70.800 

Joystick . 

Leva di comando per fornire direttamente al 
computer input di posizione in coordinate X- Y. 

106.000 

125.080 

Mouse per Apple//c . 

Comprende il dispositivo di colloquio detto 
“Mouse” ed il programma grafico Mouse 
Paint. 

190.000 

224.200 

ACCESSORI 

Borsa Apple //c . 

75.000 

88.500 

PROGRAMMI APPLICATIVI APPLE 

Apple Works //c (Tre per te) . 

420.000 

495.600 


Programma integrato per scrivere, calcolare e 
archiviare. 

Access// . 150.000 177.000 

Permette di utilizzare l’Apple //c come sistema 
di ricezione e trasmissione verso banche dati o 
altri personal computer. 


LINGUAGGI DI PROGRAMMAZIONE 

Logo 128 . 190.000 224.200 

Una nuova e potenziata versione del famoso 
linguaggio educativo. 


APPLE //E 


UNITÀ DI MEMORIA 

Disk//c . 599.000 706.820 

Unità di memoria aggiuntiva per floppy disk da 
5” 1/4 con capacità da 140 Kbyte. 


UNITÀ DI SCRITTURA 

Scribe . 549.000 647.820 

Stampante da 8 pollici, con possibilità grafiche 
e di stampa colore (fino a 7). Il processo di 
stampa è a trasferimento termico su comune 
carta in modulo singolo e/o continuo. 

ImageWriter 80 colonne . 1.100.000 1.298.000 

Stampante grafica da 8 pollici che permette di 
utilizzare foglio singolo o modulo continuo. La 
velocità di stampa è di 180 cps in modo grafico 
e di 120 cps in modo testo; il percorso è bidire¬ 
zionale ottimizzato. 

PlotterApple . 1.850.000 2.183.000 


Apple//e . 1.399.350 1.651.233 

Sistema di elaborazione professionale Apple 
//e, comprensivo di: 

—Memoria da 64 Kbyte RAM e 16 Kbyte ROM 

— Tastiera italiana con maiuscole e minuscole 

— Interfaccia per registratore a cassette 

— Segnale di uscita video B/N e colori PAL 

— Software di base residente 

— Monitor, Disassembler, BASIC esteso AP¬ 
PLESOFT 


ESPANSIONI 

Scheda 80 colonne ... 225.000 265.500 

Permette all’Apple //e di visualizzare i testi su 
80 colonne 

Scheda 80 colonne con espansione di me¬ 
moria . 485.000 572.300 

Espansione della memoria del computer Ap¬ 
ple//e a 128 Kbyte totali, e visualizzazione dei 
testi su 80 colonne 
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UNITÀ VIDEO 

Monitor//e . 

Video a 12 pollici, fosfori verdi per Apple //e 

UNITÀ DI MEMORIA 

Disk//, drive e doppio controller . 

Unità di memoria per floppy disk da 5,25 polli¬ 
ci, con capacità di 140 Kbyte per ogni floppy. 
L ’unità è comprensiva della scheda di interfac¬ 
cia per Apple //e, che permette di collegare 
anche un secondo drive aggiuntivo. 

L Apple //e permette il collegamento di 6 drive 
con controller e 6 drive aggiuntivi, nella confi¬ 
gurazione massima. 

Disk//, drive aggiuntivo . 

Unità di memoria per floppy disk da 5,25 polli¬ 
ci, con capacità di 140 Kb per ogni floppy. 

L ’unità aggiuntiva necessita del controller, for¬ 
nito nella confezione del disk // drive e doppio 
controller 

DuoDisk . 

Doppia unità di memoria per floppy disk da 
5,25 pollici con capacità di 140 Kbyte per ogni 
floppy. Per il collegamento ad Apple //è fornito 
il kit di interfaccia relativo. 

ProFile . 

Unità di memoria basata su disco rigido (Win¬ 
chester) da 5 Megabyte. Per il collegamento 
ad Apple // è fornito il relativo kit di interfaccia. 

UNITÀ DI SCRITTURA 

Silentype//e . 

Stampante termica da 80 colonne con capaci¬ 
tà grafiche. 

La confezione comprende l’interfaccia ed i ca¬ 
vi di collegamento all’Apple //e. 

Image Writer 80 colonne . 

Stampante grafica da 8 pollici che permette di 
utilizzare foglio singolo o modulo continuo. 
Stampa in normale, compresso, grassetto e 
proporzionale inoltre permette la stampa di 
grafici ad alta risoluzione. 

La velocità di stampa è di 180 cps in modo 
grafico e di 120 cps in modo testo; il percorso è 
bidirezionale ottimizzato. 

L’interfaccia richiesta è di tipo seriale, (cod. 
115-01). 

Image Writer 132 colonne . 

Stampante grafica da 15 pollici le cui caratteri¬ 
stiche, tranne la larghezza, sono simili alla 
Image Writer 80 colonne. L ’interfaccia richie¬ 
sta è di tipo seriale ed è necessario ordinare il 
set di cavi (cod. 122-10). 

Stampante a margherita Apple . 

Per ottenere stampe di documenti e corrispon¬ 
denza di elevata qualità. La spaziatura fra i 
caratteri è selezionabile: 10, 12, 15 caratteri 
per pollice. La velocità è di 40 caratteri al se¬ 
condo ed il percorso è bidirezionale ottimiz¬ 
zato. 


Prezzo Prezzo 
IVA esci. IVA comp. 


365.000 430.700 


Prezzo Prezzo 
IVA esci. IVA comp. 

L’interfaccia richiesta è di tipo seriale (cod. 

115-01) 

È necessario il set di cavi (cod. 122-08) 


PlotterApple . 1.850.000 2.183.000 

L’interfaccia richiesta è di tipo seriale (cod. 

115-01) 

700.000 826.000 

ALTRE UNITÀ PERIFERICHE 


Hand controller// . 60.000 70.800 

Due manopole di controllo comprensive di pul¬ 
sante. 


600.000 708.000 


Joystick // . 106.000 125.080 

Leva di comando per fornire direttamente al 
computer Apple//e input di posizione in coordi¬ 
nate X-Y. 


Numeric keypad //e . 298.000 351.640 

Tastierino numerico per Apple //e, completo 
ed interfacciato 


1.150.000 1.357.000 


2.700.000 3.186.000 


750.000 885.000 


1.100.000 1.298.000 


1.400.000 1.652.000 


3.636.000 4.290.480 


Tavoletta grafica per Apple //e . 

1.450.000 

1.711.000 

Mouse per Apple//e . 

Comprende il mouse, l’interfaccia per Apple 
//e ed il programma grafico Mouse Paint. 

270.000 

318.600 

INTERFACCE 



Super interfaccia seriale per Apple //e . 

Scheda di interfaccia seriale RS232 utilizzabi¬ 
le per il collegamento di stampanti e linee di 
comunicazione. 

250.000 

295.000 

Interfaccia parallela universale per Apple 

//e . 

Scheda di interfaccia che permette il collega¬ 
mento di unità periferiche con standard paral¬ 
lelo e Centronics. 

300.000 

354.000 

Scheda interfaccia IEEE 488 per Apple//e 

841.000 

992.380 

Scheda prototyping hobby per Apple //e . 

43.000 

50.740 

ACCESSORI 



Trascinatore modulo continuo per stam¬ 
pante a margherita . 

500.000 

590.000 

PROGRAMMI APPLICATIVI 



Apple Writer//e in italiano . 

Sistema di videoscrittura 

310.000 

365.800 

QuickFile//e . 

Gestione archivi ed indirizzari 

180.000 

212.400 

Business Graphics// ... 

Sistema di elaborazione e creazione di grafici. 

320.000 

377.600 

MultiplanperApple//e . 

Sistema di calcolo basato su foglio elettronico 

560.000 

660.800 


suddiviso in elementi mutuamente correlabili. 
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quanto 



Prezzo Prezzo 
IVA esci. IVA comp. 

LINGUAGGI DI PROGRAMMAZIONE ED 
UTILITIES 

Apple Pascal//e . 450.000 531.000 

Apple Fortran . 360.000 424.800 

Super Pitot . 360.000 424.800 

Co-Pilot . 65.000 76.700 

Apple Logo . 320.000 377.600 

Raccoglitore Apple Work Bench . 16.000 18.880 

DOS Programmers Tool kit . 150.000 177.000 

PRODOS Assembler Tools . 100.000 118.000 

Apple // Pascal Numeric Sane . 70.000 82.600 

PRODOS USER’S kit . 90.000 106.200 

BASIC PROGRAMMINO WITH PRODOS . 60.000 70.800 

APPLESOFT PROGRAMMERS kit . 100.000 118.000 

Apple NPL// . 1.050.000 1.239.000 

Apple //e plotter PIK . 195.000 230.100 

SPECIAL DELIVERY SOFTWARE 

Apple Project Manager . 470.000 554.600 

Pascal Animation Tool . 151.000 178.180 

Personal Finance . 151.000 178.180 

VT-100 Emulator . 151.000 178.180 

DOCUMENTAZIONE 

* Manuale utente dell’Apple //e** . 25.000 29.500 

Manuale di introduzione al linguaggio Ap¬ 
plesoft//e** . 25.000 29.500 

Manuale del linguaggio Applesoft //e . 30.000 35.4000 

Set di manuali Applesoft //e (125-25 e 

125-26) . 50.000 59.000 

Manuale del sistema Apple //e . 30.000 35.400 

Applesoft II Reference Manual** . 21.000 24.780 

Apple II Reference Manual** . 42.000 49.560 

Apple Integel Basic Programming Ma¬ 
nual** . 15.000 17.700 

* Apple Pascal Reference Manual . 39.000 46.020 

* Apple Pascal Operating System Manual 45.000 53.100 

6502 Programming Manual . 30.000 35.400 


* Set di manuali Apple Writer//e** . 

PRODOS Technical Reference Manual. 


Prezzo 

Prezzo 

IVA esci. 

IVA comp. 

49.000 

57.820 

50.000 

59.000 


* Manuali già inclusi nel prezzo delle singole 
parti, ma ordinabili anche separatamente. 
** Disponibili in lingua italiana. 


MACINTOSH 


Macintosh . 4.499.350 5.309.233 

Personal Computer Macintosh perla scrivania 

degli anni 80. 

Il sistema comprende: 

— unità centrale “32 bit” 128 K RAM e 64 K 
ROM 

— video ad altissima risoluzione 

— unità a disco semirigido da 3.5 ” per 400K 
bytes integrata 

— tastiera removi bile 

— mouse 

— due interfacce seriali RS422/RS232 Ap- 
pleBus compatibili 

— interfaccia per unità a disco esterna 

— scatola contenente disco di sistema, disco 
vuoto, disco di visita guidata per l’istruzio¬ 
ne all’uso del sistema, audiocassetta per 
visita guidata, manuale utente. Il tutto in 
lingua italiana. 

— scatola software applicativo contenente di¬ 
sco Write/Paint, disco vuoto, disco di visita 
guidata per l’istruzione all'uso delle due 
applicazioni, audiocassetta per visita gui¬ 
data, manuale MacPaint, manuale Mac 
Write. Il tutto in lingua italiana. 


UNITÀ DI MEMORIA 


Unità disco esterna . 

Unità aggiuntiva per disco semirigido da 3.5” 
per 400K bytes. 


880.000 1.038.400 


UNITÀ DI SCRITTURA 


ImageWriter 80 colonne . 1.100.000 1.298.000 

Stampante grafica da 8 pollici che permette di 
utilizzare foglio singolo o modulo continuo. 


ALTRE UNITÀ PERIFERICHE 

Numeric Keypad . 180.000 212.400 


ACCESSORI 
Borsa Macintosh 


180.000 212.400 


PERIFERICHE, ACCESSORI E SOFTWARE 
PER APPLE COMPUTER 


ESPANSIONI DI SISTEMA 


Scheda Z 80 Microsoft per Sistema Operativo 

CP/M . 947.000 1.117.460 

Cobo! 80 Microsoft per Scheda Z80 . 1.753.000 2.068.540 
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Prezzo Prezzo 
IVA esci. IVA comp. 


Prezzo 
IVA esci. 


Fortran 80 Microsoft per Scheda Z80 . 

Basic Corri piler Microsoft per Scheda Z80 . 

ALDS Microsoft (sistema di sviluppo per pro¬ 
grammi Assembler 8080, Z80 e 6502) . 

Scheda orologio calendario CCS . 

Arithmetic Processor CCS . 

TASC Microsoft (compilatore Applesoft) . 


456.000 538.080 

863.000 1.018.340 

292.000 344.560 

280.000 330.400 

1.114.000 1.314.520 
409.000 482.620 


CONSTELLATION HOST . 2.375.000 

Multiplexer che permette di collegare fino ad 
un massimo di 8 computer alla unità disco. 

Disponibile per i seguenti computer e sistemi 
operativi. 

APPLE II (DOS 3.3 e PASCAL) 

APPLE///(SOS) 


PERIFERICHE COMPATIBILI APPLE He 


Mega-Disk Doppio drive 5”, con controller . 

Doppio Drive 8” S. D. Doppia faccia . 

Doppio Drive 8” D.D. Doppia faccia universale 


2.998.000 3.537.640 
3.268.000 3.856.240 
3.550.000 4.189.000 


CONSTELLATION MASTER . 2.375.000 

È possibile collegare fino ad 8 Constellation 
Host, permettendo quindi di connettere fino a 
64 sistemi. 


INTERFACCE 


UNITÀ DI MEMORIA CORVUS 

L ’unità di memoria di massa Corvus si compo¬ 
ne di un hard disk realizzato con tecnologia 
Winchester, di un controller a microprocesso¬ 
re Z80, di un alimentatore, racchiusi in un uni¬ 
co cabinet, e di una scheda di interfaccia per il 
computer a cui deve essere connesso con il 
relativo manuale. Il software fornito collega il 
normale sistema operativo del computer al dri¬ 
ve, fornendo così la compatibilità con le perife¬ 
riche ed i programmi standard. Il backup si 
ottiene tramite l’interfaccia Mirror, copiando 
tutti i dati (o parte di essi) su una videocassetta 
utilizzando un comune videoregistratore. 

È disponibile per i seguenti computer e sistemi 
operativi: 

APPLE II (DOS 3.3 e PASCAL) 

APPLE///(SOS) 


CORVUS 20 Mbyte. 12.627.00014.899.860 

Già comprensivo di interfaccia Mirror per bac¬ 
kup inserita 

CORVUS 10 Mbyte . 7.910.000 9.333.800 

CORVUS 5 Mbyte . 5.300.000 6.254.000 


Modulatore UHF . 82.000 

Interfaccia IR ET standard Centronics . 155.000 

Interfaccia CCS parallela . 292.000 

Interfaccia CCS seriale RS232-C . 347.000 

Interfaccia Colore Apple II per Monitor Hanta- 

rex . 104.000 

Interfaccia Seriale sincrona CCS . 479.000 

Interfaccia Centronics con Buffer SET . 400.000 

Scheda CCS GPIB IEEE 488 . 662.000 

Scheda CCS A/D con verter BCD . 269.000 

Controller per Drive 8” FAST Singola densità 402.000 
Controller + Software per compatibilità IBM su 

8”singola densità . 770.000 

Controller per Drive 8” DD-DF con cavo per 

Apple II plus . 973.000 

Controller per Drive 8” DD-DF con cavo per 

Apple//e . 995.000 

Interfaccia grafica per stampante IR ET 80-132 

colonne . 238.000 

Interfaccia e ca vo Hantarex per Apple //e . 60.000 

MISCELLANEA 

Alimentatore tampone . 290.000 


DOCUMENTAZIONE 


INTERFACCIA MIRROR PER BACKUP . 2.100.000 2.478.000 

N.B. Se ordinata assieme ad una delle unità 
CORVUS, è inserita in esso, altrimenti è un’u¬ 
nità a parte. 

È sempre compresa nel modello da 20 Mbyte. 


VIDEOREGISTRATORE . 1.272.300 1.526.760 

Per backup 


VIDEOCASSETTE . 26.100 30.798 


RETE CONSTELLATION CORVUS 

La rete Constellation permette di collegare fino 
ad un massimo di 64 computer ad un unico 
hard disk Corvus (5-10-20 Mbyte). 

La rete si compone di uno o più multiplexer e di 
interfacce da inserire nei vari computer (ne 
necessita una per ogni sistema che si vuole 
collegare). 

La lunghezza massima dei cavi di collegamen¬ 
to è di 15 metri. 


32 Programmi per Apple (Franco Muzzio Edit.) 9.314 
SOFTWARE 

Personal Da ta Base 5” . 72.000 

Personal Data Base 8” . 82.000 

Personal Filing System per Apple II . 244.000 

Personal Report System per Apple II . 217.000 

Programming AIDS 3-3 . 209.000 

Personal Filing System per Apple III . 299.000 

Personal Report System per Apple III . 262.000 

PTERO (Cominfor) Word processing . 190.000 

P. F.S. Graphics// . 244.000 

P.F.S. Graphics/// . 341.000 

P.F.S. Data Saver . 117.000 

Personal Filing System per Apple //e . 244.000 

Personal Report System per Apple //e . 244.000 

Personal Filing System Graph per Apple //e .... 244.000 

Dossier (Mondadori) . 549.020 

Fisica Ottica (Mondadori) . 147.059 

Logica simbolica (Mondadori) . 127.451 

Dedalus (Mondadori) . 58.824 

CFS file (DataBase Cominfor) . 200.000 


Prezzo 
IVA comp. 


2.802.500 


2.802.500 


96.760 

182.900 

344.560 

409.460 

122.720 

565.220 

472.000 

781.160 

317.420 

474.360 

908.600 

1.148.140 

1.174.100 

280.840 

70.800 


342.200 


9.500 


84.960 
96.760 
287.920 
256.060 
246.620 
352.820 
309.160 
224.200 
287.920 
402.380 
138.060 
287.920 
287.920 
287.920 
560.000 
150.000 
130.000 
60.000 
236.000 
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Applicando è una miniera di 
idee, di programmi, di articoli, 
di suggerimenti. Basta dare 
un'occhiata ai contenuti di cia¬ 
scun numero per rendersene 
conto. Perderne uno è un pec¬ 
cato. Ma il numero 2 è già 
esaurito, degli altri sono di¬ 
sponibili solo scorte limitate. 
Chi li desidera per completare 
la sua collezione, si affretti a 
spedire il tagliando di questa 
pagina (o anche una fotoco¬ 
pia, per non rovinare la rivi¬ 
sta). Nel giro di 15 giorni rice¬ 
verà le copie richieste, senza 
aggravio di spese postali. 


Applicando 
ha un futuro. 

Ma anche 
un passato. 



1 - Maggio-Giugno 1983 - Lire 
7.000 - Una guida per utilizzare il WPL e 
per rendere automatico il lavoro d’uffi¬ 
cio • Il VisiSchedule, un programma 
per ottimizzare i tempi di lavorazione • 
Statistiche (1) • Come aumentare la 
capacità dei dischetti fino al IO 0 /? • 
Tutti gli uomini di Dossier • Per i 
piccoli amici del computer un utile eser¬ 
cizio di ortografia e di tastiera (i) • 
Analizzare entrate e uscite in funzione 
del punto di pareggio • Come trasfor¬ 
mare l’Apple// in un orologio-sveglia 
elettronico • Tu sei il guardiano del 
castello e hai venticinque colpi da spa¬ 
rare contro gli intrusi • Un calendario 
perpetuo dal 1582 a oltre il 200Ó • 
Disegniamo sullo schermo (i) • / C / ome 
trasformare la tastiera di un Apple/// in 
un pianoforte • Una spericolata caccia 
al tesoro • Tabella di compatibilità dei 
programmi APPLE//e e Apple II. 

(i) I programmi contrassegnati da 
questo simbolo sono contenuti nel 
dischetto omaggio riservato agli 
abbonati. 


2 - Luglio-Agosto 1983 - Lire 7.000 - 
Come determinare i costi di esercizio di 
qualunque auto, partendo non da dati 
standard, ma dai costi effettivi • A con¬ 
fronto due pacchetti di software per ge¬ 
stire la contabilità • Scrivere da sé i 
propri programmi non è difficile. Per chi 
comincia, ecco la prima puntata di una 
guida al Basic, utile anche a chi sa già 
tutto • Posizionare dove si vuole sullo 
schermo lè figure di una tavola? Ingran¬ 
dirle, ruotarle, cambiar colore? Aggiun¬ 
gere figure di un’altra tavola? Con que¬ 
sto programma diventa facilissimo • 
Una torretta laser, attaccata da asteroidi, 
astronavi e alieni. Ma a difenderla ci sei 
tu • Cos’è Dossier, a cosa serve, come 
funziona?^» Alcuni semplici sistemi di 
protezione se‘preferite che nessuno 
possa accedere ai vostri dati quando 
lasciate un attimo la tastiera • Prevede¬ 
re l’andamento ciclico degli affari? Pro¬ 
vate con questi grafici • Una routine in 
linguaggio macchina per migliorare la 
gestione della memorizzazione su disco 
di numeri reali. 


3 - Settembre-Ottobre 1983 - Lire 
7.000 - Un programma di Data Base che 
ha il pregio di non costare nulla (solo la 
fatica di digitarlo) o appena trentamila 
lire (25.000 per gli abbonati) se lo si 
vuole già pronto su dischetto • Ecco 
Logo in italiano • Una scheda e una 
telecamera: così il vostro Apple acqui¬ 
sta anche la vista • Etichette spiritose o 
bizzarre, di lavoro o di ogni genere, 
stampate facilmente nel numero deside¬ 
rato • Piccoli editori, circoli, club e 
associazioni possono raggiungere soci 
e abbonati facilmente, servendosi di 
questo programma dal costo contenuto 
• Equo canone col VisiCalc per padroni 
o inquilini • Una routine in grado di far 
stampare i vostri grafici alla Epson M- 
80 • Seconda puntata del corso di 
Basic • Poche domande sullo schermo, 
per rispondere alle quali basta una se¬ 
gretaria, ed ecco pronto un documento 
di più pagine personalizzato • Dadi e 
punti: uno scontro ad armi pari contro 
un altro avversario in carne e ossa o 
contro il computer. 


_ 

Tagliando di richiesta arretrati 

Sì! Inviatemi i seguenti numeri arretrati di Applicando: 


Cognome e nome . 

Via .N. 

Cap. Città . Provincia ., 


□ Allego L.. in francobolli 

□ Allego ricevuta di versamento di L.sul conto corrente postale n. 

19740208 intestato a Editronica srl - Corso Monforte, 39 - 20122 Milano 

□ Allego assegno di L.non trasferibile intestato a Editronica srl. 

Data .. Firma . 



4 - Novembre-Dicembre 1983 - Li¬ 
re 7.000 - Tre schede, una tastiera e un 
po’ di software: e il computer diventa 
un’intera filarmonica digitale • Piano¬ 
forte, organo e violino in Pascal: tre 
miniiistati e Apple suona • Ecco il pro¬ 
gramma per imparare a leggere più ve¬ 
locemente (e per fare esercizio d’ingle¬ 
se) • Elogio del VisiDex: tutto quello 
che dovete sapere su uno dei Data Base 
più flessibili in commercio • Grazie 
Lisa: cos’è e a chi può servire il rivolu¬ 
zionario personal computer della Apple 
• Rompiquindici: quindici pedine bian¬ 
che da mettere nel giusto ordine. Con 
questo programma, uno dei rompicapo 
più famosi del mondo può essere gioca¬ 
to anche sullo schermo • Per chi ha i 
dischetti del Sistema Pascal, ecco una 
rassegna delle possibilità offerte e dei 
comandi a disposizione • Il programma 
Dedalus • Terza puntata della guida 
Basic di Applicando • Guida ragionata 
dei software in commercio per la gestio¬ 
ne condominiale • Una numeric keypad 
fatta di software. 



5 - Gennaio-Febbraio 1984 - Lire 
7.000 - La tecnologia del mouse appli 
cata anche ad Apple// e Apple/// • Ma¬ 
cintosh, piccolo, maneggevole, portatile 

• Apple // ricorda i vostri impegni di ur 
anno intero, memorizzando fino a quin¬ 
dici appuntamenti al giorno • Ecco la 
descrizione approfondita di un pro¬ 
gramma per la contabilità semplificata 

• Un gioco per due, nel quale si danno 
battaglia cannoni di grosso calibro • 
Investor in portafoglio: uno dei migliori 
programmi da digitare (e sicuramente il 
più economico in assoluto per chi lo 
vuole su dischetto: solo settantamila lire 
o sessantamila se è abbonato ad Appli¬ 
cando) fornisce in tempo reale il quadro 
di come vanno i propri investimenti fi¬ 
nanziari. Semplice come struttura, con 
cinque prospetti riepilogativi e un grafi¬ 
co con 52 periodi di quotazioni, Investor 
è l’ideale per la gestione del proprio 
portafoglio titoli • Quarta puntata del 
corso di Basic • Il gioco delle freccette 
in versione elettronica • Prima puntata 
del corso di Pascal. 


/ Per ricevere 
/ subito a casa, 

/ senza aggravio 
/ di spese postali, 

l’arretrato o gli arretrati 
che ti interessano,, 
compila e spedisci subito 
questo tagliando 
in busta chiusa a: 

EDITRONICA 
UFFICIO ARRETRATI DI 
V APPLICANDO 

\ C.so Monforte, 39 
\ 20122 Milano 






































Vorreste riuscire a non tenere più 
confinati nei bordi del monitor 
del vostro Apple III i grafici? 
Questo programma consente il dump 
della pagina grafica su una 
stampante semigrafica 


Grafici a 


L e possibilità grafiche offerte da 
un personal sono, come si sa, 
molteplici e vanno dai giochi alle ap¬ 
plicazioni professionali. È proprio in 
quest’ultimo settore che la grafica si 
sfrutta soprattutto per rappresentare 
dati complessi in forme molto semplici 
e di immediata comprensione. Di soli¬ 
to i venditori di hardware mettono in 


risoluzione semigrafica della stampan¬ 
te, si riesce a trovare per qualsiasi 
stampante il simbolo corrispondente. 

Come gira 
il programma 

La configurazione hardware previ¬ 
sta per il listato pubblicato in queste 


pagine è Apple III con Mannesman 
Tally MT 140. Con poche modifiche 
però può venir adattato a qualsiasi al¬ 
tro modello di stampante. 

La struttura del programma è molto 
semplice: nella prima parte chiede 
qual è la modalità grafica con cui è 
realizzato il grafico e il suo nome su 
disco, poi carica il file nella pagina 


evidenza le eccezionali capacità grafi¬ 
che del computer senza preoccuparsi 
dei bisogni dell’utilizzatore, che in 
quasi la totalità dei casi ha l’esigenza di 
ottenere un risultato su carta anziché 
su video. 

Non tutti poi possono permettersi 
un plotter, così devono accontentarsi 
di una stampante con opzione grafica. 
E la prima difficoltà per chi sceglie 
questa soluzione consiste nel riuscire a 
sfruttare la grafica della stampante, 
che necessita di un pilotaggio attraver¬ 
so driver grafico (programma general¬ 
mente in linguaggio macchina per in¬ 
terfacciare computer con periferica). 

Il programma di queste pagine è na¬ 
to sfogliando le pagine del libretto di 
istruzioni della stampante (una Man¬ 
nesman Tally MT 140). Ciò che deve 
fare è leggere la pagina grafica consi¬ 
derando un blocchettino di pixel alla 
volta, e scegliere, fra i simboli grafici 
della stampante, il più adatto. Se infat¬ 
ti si suddivide io schermo in tanti pic¬ 
coli quadratini delle dimensioni della 


Figura 1. Utilizzando i dati delia tabella si possono ricavare i codici dei 
caratteri semigrafici. Un eventuale adattamento risulterà facilitato. Per tro¬ 
vare i codici dei caratteri si deve fare la codifica da binario a decimale dei 

codici che si 
trovano 
ai lati della 
tabella. Quelli 
orizzontali 
forniscono 
i bit più 
significativi e 
quelli verticali 
forniscono 
imeno 
significativi. 
Per esempio 
il codice 
del carattere 
si avrà con: 
x x 

IOLI Olii = 
128+0+ 
32+16 + 0+ 
4+2+1 =183. 
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grafica n. 1. Il cuore del programma è 
la generazione del carattere semigrafi¬ 
co da inviare alla stampante: è una 
successione di strutture IF THEN EL¬ 
SE che analizzano lo schermo e scelgo¬ 
no il carattere corrispondente. Sulla 
Tally i caratteri semigrafici sono com¬ 
posti da una matrice 2X3. Per chi 
avesse un’altra stampante, l’elenco 
completo dei caratteri, con il corri¬ 
spondente codice Ascii per facilitare la 
modifica, è pubblicato in Figura 1. 

L’esecuzione, ovviamente, è piutto¬ 
sto lenta per la presenza di quattro 
cicli di FOR nidificati: i due più esterni 
scandiscono lo schermo orizzontal¬ 
mente e verticalmente, quelli più in¬ 
terni scandiscono il carattere semigra¬ 
fico. Due sono gli accorgimenti da te¬ 
nere presenti. Il primo è controllare 
che nella configurazione del driver 
venga impiegato il codice a 8 bit (i 
caratteri semigrafici infatti hanno co¬ 
dici superiori al 128). Il secondo è di 
caricare la routine grafica «bgraf.inv» 
prima di eseguire il programma. 

I limiti del programma sono princi¬ 
palmente legati alla stampante: con 
una 132 colonne e carattere semigrafi¬ 
co 2x3 si riesce a stampare la pagina 
grafica nelle modalità 280x191. Con 
qualche prova si troverà la soluzione 
più appropriata per i propri lavori. 


Le linee principali 

5: apertura del canale della stampante 
e dimensionamento della matrice del 
carattere. 

20: selezione del modo grafico (relati¬ 
vo alla definizione sull’asse delle ordi¬ 
nate) con cui è stato eseguito il grafico 
o il disegno. Per chi ha un altro model¬ 
lo di personal ecco le modalità grafi¬ 
che dell’Apple III per un più semplice 
adattamento: 0) 192 x 280; 1) 192 x 280 
con 16 colori ma limitati; 2) 192 x 560; 
3) 192 x 140 con 16 colori senza limita¬ 
zioni. 

35: chiamata al SOS per settare la con¬ 
figurazione grafica. 

40: inizializzazione dello schermo gra¬ 
fico. 

50: mostra lo schermo grafico. 

60: carica dal disco il FOTOFILE da 
stampare. 

90: arma la subroutine per swappare 
fra text e grafica. 

1000-1010: cicli di for esterni per la 
scansione del video grafico. 

1040: funzione per lo spostamento del 
cursore grafico. 

1050: funzione per leggere lo stato del 
pixel (acceso/spento). 

1200-1330: serie di IF per trovare la 
configurazione del carattere. 


1 rem- 

2 REM DUMP GRAFICO APPLE /// SU MANNESMAN TALLY 140 

3 REM- 

4 REM 

5 REM 

6 REM Apertura del canale per la stampante 

7 REM 

8 OPENtl,".printer":DIM car(l,2) 

9 GOSUB 5000 

10 WINDOW 4,4 TO 76,22 

11 VPOS=2 

12 INPUT”Modo grafico ’280x192,280x192(c),560x192,140x192 

' 10,1,2,31";mode X 

14 REM 

15 REM Selezione del modo grafico per inviare alla stam- 

16 REM pante la escape sequence appropiata di compresio- 

17 REM ne o di espansione 

18 REM 

19 REM 

20 IF(mode*<0 OR modet>3) THEN 10 

25 INPUT M Foto file da dumpare ? ";a$ 

27 IF(mode* =0 OR mode* = l) THEN xmax=279;PRINTtl;CHR$(27); 
" [ 5w" 

29 IF modet=2 THEN xmax=478;PRINTtl;CHR$(27);"[7w" 

31 IF mode*=3 THEN xmax=l39sPRINT#1;CHR$(27);"l4w" 

32 REM 

33 REM Apertura del driver grafico con la configurazione 
richiesta 

34 REM 

35 PERFORM grafixmode(tmode*,* 1) 

40 PERFORM initgrafix 

50 PERFORM grafixon 

53 REM 

54 REM Caricamento nella pagina grafica n.l dell’immagine 

55 REM da stampare 

56 REM 

60 IF a $ < >"" THEN PERFORM gload.a$ 

70 PRINT;PRINT 

80 TEXT 

85 REM 

86 REM Armamento dell'evento di keypress per visualizzare 

87 REM grafico o testo 

8 8 REM 

90 ON KBD GOTO 4000 : flag=l 

95 REM 

96 REM 

97 REM Inizializzazione delle variabili 

98 REM 

100 z=0;tre=3 ;due = 2:u=l;d = 2 

990 REM 

995 REM Cicli esterni di scansione della pagina grafica 
997 REM 

1000 FOR j=191 TO z STEP-tre 
1010 FOR i=0 TO xmax STEP due 

1014 REM 

1015 REM Cicli interni per la scansione del carattere 

1016 REM da stampare 

1017 REM 

1020 FOR a=0 TO u 

1030 FOR b=0 TO d 

1037 REM 

1040 PERFORM moveto(ti+a,tj-b) 

1045 REM 

1046 REM Funzione assembler per la lettura del 

1047 REM singolo pixel 

1048 REM 

1050 car( a,b) = EXFN*.xycolor 

1060 NEXT 

1070 NEXT 

1095 REM 

1096 REM Fase di test sulla matrice del carattere 

1097 REM per inviare alla stampante codice 

1098 REM corrispondente 

1099 REM 

1100 IF(car(0,2) AND car(1,2)) THEN ch=48;GOTO 1200 

1110 IF car(0,2) THEN ch=16:GOTO 1200 

1120 IF card,2) THEN ch=32;GOTO 1200 

1125 ch=0 

1197 REM 

1198 REM selezione dei primi 4 pixel del carattere 

1199 REM 
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1200 

1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 

1295 

1300 

1310 

1320 

1330 

1335 

1336 

1340 

1800 

1810 

1820 

2000 

2400 

2445 

2446 

2447 

2450 

2480 

2485 

2487 

2488 

2500 

3000 

3005 

3010 

3990 

3995 

3997 

3998 

4000 

4010 

4020 

5000 

5010 

5020 

5100 

5105 

5110 

5120 

5130 

5140 

5150 

5160 

5170 

5180 

5220 

5230 

5240 

5250 

5260 

5270 

5300 

5350 

5360 

5370 

5380 

5400 


IF(car(l,l) AND car(l,0) AND car(0,l) AND car(0, 
0)) THEN ch=ch+l4 3 : GOTO 2000 

IF(car(1,1) AND car(0,l) AND car(1,0)) THEN ch=c 
h+14 2 : GOTO 2000 

IF(car(1,1) AND car<0,l) AND car(0,0)) THEN ch=c 
h+141 : GOTO 2000 

IF(car(0,1) AND car(0,0) AND car(1,0)) THEN ch=c 
h + 135 : GOTO 2000 

IF(car(1,0) AND car(0,0) AND car(l,l)) THEN ch=c 
h+139:GOTO 2000 

IF(car(0,1) AND car(l,l)) THEN ch=ch+l40 : GOTO 20 
00 

IF(car(1,0) AND car(1,1)) THEN ch=ch + l38 : GOTO 20 
00 

IF(car(0,0) AND car(l,l)) THEN ch=ch+l37 : GOTO 20 
00 

IF(car(0,1) AND car(l,0)) THEN ch=ch+l34 : GOTO 20 
00 

IF(car(0,0) AND car(0,l)) THEN ch=ch+l33 : GOTO 20 
00 

IF(car(0,0) AND car(l,0)) THEN ch=ch+l31 : GOTO 20 
00 

IF car(1,1) THEN ch=ch+l36 : GOTO 2000 
IF car(0,1) THEN ch=ch+l32 : GOTO 2000 
IF car(0,0) THEN ch=ch+l29 : GOTO 2000 
IF car(1,0) THEN ch=ch+l30 : GOTO 2000 
REM 

REM offset per i caratteri semigrafici 
ch=ch+l28 


REM 

REM Invio del carattere alla stampante 
REM 

PRINT#1;CHR$(eh); 

NEXT 

REM 

REM Invio di un carriage return alla stampante 
REM 

PRINT #1 ;CHR $(13); 

REM 

REM Calcola la percentuale riferita alla quantità' 

REM di immagine già' stampata 

REM 

INVERSEtPRINT 100-INT((j/192)*100);" X NORMA 

L 

NEXT 

WINDOW 1,1 TO 80,24 

END 

REM 

REM Subroutine per lo scambio fra pagina grafica 

REM e pagina testo 

REM 

IF flag THEN PERFORM grafixon:f1ag=0: ELSE TEXT:flag = 
1 

ON KBD GOTO 4000 

RETURN 

REM 

REM Suroutine di presentazione 
REM 

PRINT CHR$(28):INVERSE 
VPOS=0 

FOR i=l TO 80 
PRINT" "; 

NEXT 
HPOS=0 
VPOS = 2 3 
FOR i=l TO 80 
PRINT" "; 

NEXT 

FOR i=l TO 22 
VPOS=i 
HPOS=0 
PRINT" "; 

HPOS=79 
PRINT" "; 

NEXT 
NORMAL 
HPOS=l5 
VPOS=3 

PRINT"DUMP PAGINA GRAFICA SU STAMPANTE SEMIGRAFICA M 
T-140" 

RETURN 


2000: manda un CR alla stampante. 
2500: stampa sul video la percentuale 
di grafico già elaborata. 

4000-4020: subroutine per cambiare 
fra testo e grafico. 

5000-5400: subroutine di presenta¬ 
zione. 




Figure 2 e 3. Grafici ottenuti con il 
programma di queste pagine. 


Una volta lanciato, il programma 
chiede di scegliere fra le risoluzioni 
grafiche possibili su hardware Apple 
III. Si deve rispondere con un numero 
compreso tra 0 e 3; in caso di errore 
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Il Soft II vale per III 

Q uesta routine di utilità sarà gradita a tutti i possessori 
di APPLE III che hanno voglia di arricchire la loro 
collezione di programmi basic attingendo alla vasta bibliote¬ 
ca di programmi Apple II scritti in Applesoft Basic. Viene 
utilizzato il programma di utilità di trasferimento file tipo 
Ascii da Apple II a Apple III che viene fornito insieme col 
programma di scrittura Apple writer III. La procedura da 
usare è questa. 

All’inizio del programma Basic si devono introdurre le 
seguenti linee: 


1 d$=chr$(4):poke 33,30 

2 print d$;“open temp” 

3 print d$;“write temp” 

4 list x,y 

5 print d$; “dose temp” 

6 end 


(n.b. x e y sono i numeri di linea dove inizia e finisce il 
programma da trasferire) il programma è stato trasferito nel 
file temp in formato testo. 

Ora si deve lanciare il programma di utilità dell’Apple 
writer ///, si seleziona l’opzione di trasferimento file da Ap¬ 
ple II a Apple III per trasferire il file temp su un disco 
formattato SOS. 

Infine ecco la fase più laboriosa, in quanto si devono 
cambiare i comandi Applesoft in comandi Business Basic. È 
consigliabile usare Apple write III che facilita molto il lavoro, 
soprattutto con l’opzione di replace. Le sostituzioni princi¬ 
pali riguardano i vari HTAB e VTAB che vanno sostituiti 
con HPOS e VPOS (naturalmente usando il replace automa¬ 
tico). Poi si devono modificare le chiamate al sistema opera¬ 
tivo e i PEEK, POKE e cali che non esistono in Business 
Basic. Questa è una lista dei più importanti: 

APPLESOFT APPLE II BUSINESS BASIC APPLE III 


cali -936 
cali -384 
cali -380 
cali -875 
poke 37,x 
poke 36,x 


home 

inverse 

normal 

print chr$(31) 

vpos=x 

hpos=x 


Finite le sostituzioni si deve caricare il Business Basic e 
digitare EXEC temp per eseguire il programma. A questo 
punto è possibile memorizzare il programma in formato 
normale, ovvero tipo Basic, con un semplice SAVE nome 
file. 


ripropone la domanda. In se¬ 
guito viene richiesto il file in cui 
è registrata l’immagine da 
stampare. È importante che la 
modalità grafica introdotta 
concordi con quella con cui è 
stata creata l’immagine. In caso 
contrario sul video apparirà 
un’immagine sfocata. Per rime¬ 
diare basta premere il tasto di 


RESET e rilanciare il program¬ 
ma. Durante la fase di stampa si 
può scambiare in continuazione 
fra pagina grafica e pagina di 
testo schiacciando il tasto di 
SPAZIO; su quest’ultima viene 
visualizzata la percentuale di 
disegno che è già stata stam¬ 
pata. 

Nicola Morbelli 


ISBTHWMCOW 

DALL'MVE 



Filiali: Milano Tel. 02/75451-Torino Tel. 011/6192192 
Mestre Tel. 041/962255 - Genova Tel. 010/451801 
Bologna Tel. 051/557157-Firenze Tel. 055/355841 
Roma Tel. 06/58421 -Napoli Tel. 081/660266. 
Distributori autorizzati in tutta Italia-vedi Pagine Gialle. 
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SUPPORTI MAGNETICT3M. 

NZIOM AL PRMATO TECNOLOGICO. 



I, 


Il primo nastro per 
computer è stato 
prodotto dalla 3M 
nel 1952. Un primato 
che ha consentito la 
realizzazione dei 
supporti magnetici più 
affidabili e sicuri. 

Le Diskette 3M, 
ad esempio. Omologa^ 
dai maggiori costruì 
Certificate al 100%. 

Garantite 5 anni/Esportaf 
in tutto il mondo. Prescelte come 
riferimento intemazionale da ECMA, 
ISQ^ed AN#f. Una gamma completa 
p^l^Diskette 8 pollici che per le 
finiaiskette 5 pollici e un quarto. 

Le Diskette 3M, grazie all’esclusivo 


/ rivestimento magnetico, 

d/P garantiscono 
Xxr un’eccezionale resistenza 

| all’usura.e la massima 
affidabilità. 

La stessa affidabilità 
che offrono tutti i 
Supporti Magnetici 3M: 
Nastri per Computer, 
Dischi Magnetici, 

Data Cartridge. 

Le Diskette e i Nastri Magnetici 3M 
sono interamente fabbricati in Italia e 
questo significa immediata reperibilità 
e migliore assistenza. 

Assistenza e consulenza tecnica 
che il Cliente trova presso le 8 filiali, 
i venditori diretti e 400 distributori 3M, 
in tutta Italia. 


SISTEMI PER L'UFFICIO 3M.LA PERFEZIONE DELLA SPECIE. 



I-1 

| Desidero ricevere ulteriori informazioni | 
* sui Supporti Magnetici 3M. 

I Nome_ 

Azienda_ 

I Via_ 

I Cap_C ittà_ 

I A 

Ritagliare e spedire a: 

I 3M Italia S.p.A.-Linea Diretta- 
| Casella Postale 10411/10412-20110 Milano. 

I Oppure telefonare a: 02/75451 

i_ 























lettere 



Dischetti sempre 
più sicuri 

Su Applicando n. 2, nel¬ 
l’articolo pubblicato a pagi¬ 
na 55 e intitolato «Un di¬ 
schetto a combinazione», 
c’è un piccolo errore. 10 PO- 
KE214,128 all’inizio del 
programma, si può evitare 
la listatura solo se si è prima 
dato il run. Infatti, leggendo 
un programma dal drive con 
il LOAD, anche se il pro¬ 
gramma contiene quella 
POKE, lo si listerà comoda¬ 
mente. Esiste un altro modo 
molto semplice e molto sicu¬ 
ro per impedire che venga 
visionato il listato di un pro¬ 
gramma cui si tiene partico¬ 
larmente: basta adoperare i 
caratteri non stampabili (co¬ 
me le sequenze CTRL-) da 
aggiungere nel nome del 
programma da salvare. In¬ 
fatti, esse non appariranno 


mai nel CATALOG, per 
esempio: con un program¬ 
ma da titolare Applicando 
digiteremo SAVE APPLI¬ 
CANDO e invece di RE¬ 
TURN premeremo il tasto 
CTRL. Quindi tenendolo 
premuto, introdurremo la 
nostra parola chiave, in que¬ 
sto caso PENNA. Fatto 
questo lasceremo il tasto 
CTRL e batteremo RE¬ 
TURN. Per poter leggere e 
listare il programma sarà 
d'ora in avanti necessario 
essere a conoscenza della 
parola chiave. Se poi oltre 
alla sequenza CTRL inseri¬ 
remo nel programma la PO¬ 
KE, si potrà avere una Ser¬ 
ratura a prova di scasso a 
tutti gli effetti. 

Carlo Oriani 
Milano 

Più che un errore quello 
del POKE 214,128 sembra 


essere un inconveniente della 
macchina. Comunque, per 
ovviarvi si può fare in modo 
che la POKE 214,128 venga 
messa automaticamente ogni 
volta che viene lanciato il di¬ 


schetto: in pratica occorre in¬ 
serirla nell'HELLO. Un al¬ 
tro sistema di proiezione può 
essere quello di mettere dei 
REM particolari distribuiti 
lungo il listato. Questi REM 


Mercatino delle mele 


w Cerco utenti di Apple 
II o Apple //e per scambio 
programmi di qualsiasi ti¬ 
po. Inviatemi la vostra li¬ 
sta, assicuro risposta a tut¬ 
ti con la mia. Edoardo Fer- 
retti, Via Suardi 18, 
Bergamo. 

flt Vendo computer Mpf 
II, Apple compatibile, 
comprensivo di tastiera 
esterna, interfaccia per 
due drive, uri drive, un joi- 
styck e numerosi program¬ 


mi su disco come: Aztec, 
Mistery House etc. Il tutto 
al prezzo di lire 1.300 mila. 
Antonio Ammanati, Via 
Collodi 31, 56100, Pisa. 
Tel. 050/26345. 

Cerco in zona Roma e 
provincia possessori di 
Apple //e per scambio pro¬ 
grammi. Risponderò con il 
mio elenco a chi mi invierà 
il proprio. Massimo d’Am¬ 
brosio, Via Giangiacomo 
Porro 15, 00197, Roma. 



flfcappkz computer 

DISTRIBUTORE 
APPLE 

CON CENTRO 
ASSISTENZA 
DI 1° LIVELLO 



Computer Ihop 

VlaV. E. Orlando, 164/166 
Tel. (095) 44 16 20 
95127 CATANIA 
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devono essere per una riga 
pieni di spazi mentre il primo 
carattere della seconda riga 
deve essere un CTRL-D se¬ 
guito da un qualsiasi coman¬ 
do Dos. In questo modo , 


®Cerco possessori di 
Apple per scambio pro¬ 
grammi. Inviatemi i vostri 
cataloghi, risponderò con i 
miei. Roberto Moretti, St. 
Torino 73, 10024, Monca- 
lieri (Torino). 

W Vendo Apple II Euro- 
plus, comprensivo di: 
64+128K, paddle numeri¬ 
co, scheda colore, modu¬ 
latore B/N o colore, stam¬ 
pante grafica Centronics 
739, Visicalc, Super-Scri- 
be (40-80 colonne su vi¬ 
deo), Apple Writer II ed 
altri. Tutto in perfetto sta¬ 


ogni volta che si chiede il li¬ 
stato , la macchina interpreta 
il REM come un comando 
da eseguire interrompendo 
la lettura del programma. Il 
sistema proposto dal lettore 


to con i relativi manuali a 
lire 2 milioni. Tel. 
06/864177. 

® Cerco fotocopia del 
manuale di istruzioni per 
la scheda d’espansione 80 
colonne -I- 64K per Apple 
//e. Cerco inoltre utenti 
Apple, preferibilmente 
zona Milano, per scambio 
programmi. Telefonare 
ore serali a Gabriele, Tel. 
02/585633. 

AB Vendo a lire 100.000 il 
seguente software: Lock- 
smith 5.0, Applewriter, 


può invece essere facilmente 
escluso con un trucco consi¬ 
gliato dal Manuale del siste¬ 
ma operativo dos per eviden¬ 
ziare i caratteri immessi con 
CTRL. Eccone il listato. 


Autodidattico Basic, Visi- 
Cale. Per contatti scrivere, 
specificando il numero te¬ 
lefonico, a: Giorgio Bassi, 
Via N. Sauro 50, Rolo, 
(Reggio Emilia). 

S SavonAppleClub cerca 
possessori Apple per 
scambio programmi. In¬ 
viate lista. POB. 13, 
17100, Savona. 

Vendo/Cambio pro¬ 
grammi Ap'ple di ogni ge¬ 
nere. Inviate la vostra lista 
a : Claudio Oggioni, 
Via Gonzales 4, Milano. 


10 DATA 
201,141,240,21,201,136 

2 0 DATA 

240,17,201,128,144,13 

3 0 DATA 

201,160,176,9,72,132 

4 0 DATA 

53,56,233,64,76,249 

50 DATA 253,76,240,253 
60 DATA FOR I 768 TO 
768 + 27 

70 READ V: POKE I,V: 
NEXTI 

80 POKE 54,0: POKE 55,3 
90 CALL 1002 


Più settori 
sul dischetto 

A proposito del program¬ 
ma «Più spazio nel dischet¬ 
to» di Applicando n. 1 vorrei 
fare una proposta. Poiché il 
programma non cancella 
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68000 

Microprocesslor 

Handbook 


A Osbomo/McGraw-Hill 


Rpple Backpack 


Chi mangia la mela? 


In edizione originale 
americana, ecco i libri 
che avete sempre 
cercato, dalla casa 
editrice che nel 
computer si è 
specializzata: la 
McGraw-Hill. 


Apple Backpack 

di Scot Kamins e Mitchell Waite. Tutto su 
come realizzare programmi user friendly, 
con controlli a prova d’errore. 

Lire 42.000. Abbonati ad 
Applicando 33.700. 


68000 Assembiy Language 
Programming 

di Gerry Kane, Doug Hawkins, Lance A. 
Leventhal. Presenta e spiega una per una, 
tutte le istruzioni del 68000. 

Lire 50.000. Abbonati ad 
Applicando 40.000. 


Some Common Basic Programs 

di Lon Poole, Mary Borchers e David M. 
Castlewitz. 76 programmi che 
costituiscono un’antologia di listati 
finanziari, statistici e matematici. 

Lire 44.800. Abbonati ad 
Applicando 35.800. 

Apple III 

di Stanley M. Miastkowski. Tutte le 
informazioni necessarie per superare ogni 
problema d’uso dell’Apple III. 

Lire 47.300. Abbonati ad 
Applicando 37.800. 

VisiCalc Home and office 
Companion 

di David M. Castlewitz e Lawrence 
Chisausky. Modelli pronti per 
investimenti, pubblicità, vendite, 


Logo For The Apple// 

di H. Abelson. Tutto sul Logo, il nuovo 
linguaggio facile da usare, utilissimo agii 
adulti che vogliono insegnare ai bambini. 

Lire 47.000. Abbonati ad 
Applicando 37.500. 


Hands-On-Basic 

di Herbert Peckham. Si fa esperienza 
pratica sul computer attraverso una serie 
di attività guidate. 

Lire 57.900. Abbonati ad 
Applicando 46.300. 








personale, inventari, per il VisiCalc. 

Lire 41.700. Abbonati ad 
Applicando 33.400. 

Science and Engineering Programs 

di John Heilborn. 46 programmi per 
termodinamica, equazioni lineari, 
differenziali, analisi strutturale, serie di 
Fourier, ecc. 

Lire 42.200. Abbonati ad 
Applicando 33.800. 

Applesoft Basic From 
The Ground Up 

di H.Mullish e D.Kruger. Per chi 
comincia, ecco una guida pratica 
all’Applesoft che conduce per mano fino 
alla programmazione strutturata. 

Lire 18.000. Abbonati ad 
Applicando 14.400. 


The Small Computer Connection 

di Neil L. Shapiro. Passo per passo, come 
col legare i I vostro Apple al mondo esterno 
per accedere alle banche dati. 

Lire 47.400. Abbonati ad 
Applicando 37.950. 

68000 Microprocessor Handbook 

di Gerry Kane. Conoscerei! 
microprocessore di Lisa e di Macintosh. 

Lire 27.000. Abbonati ad 
Applicando 21.700. 

54 VisiCalc Models 

di Robert H. Flast. Investimenti, mutui, 
tasse, e un’altra trentina di problemi 
statistici e matematici risolti da questa 
collezione di modelli per VisiCalc. 

Lire 42.000. Abbonati ad 
Applicando 33.600. 


Inviatemi, senza aggravio di spese postali, i 

□ 54 VisiCalc Models 

□ The Small Computer Connection 

□ 68000 Microprocessor Handbook 

□ Apple Backpack 

□ Logo For The Apple// 

□ 68000 Assembly Language Programming 


seguenti libri McGraw-Hill: 

□ Hands-On-Basic 

□ Some Common Basic Programs 

□ Apple III 

□ VisiCalc Home and office Companion 

□ Science and Engineering Programs 

□ Applesoft Basic From The Ground Up 


Cognome e nome. 

Via.N.Cap. 

Città.Provincia. 

□ Sono abbonato. □ Non sono abbonato. 

□ Allego assegno non trasferibile di L.intestato a Editronica Srl. 

□ Allego ricevuta di versamento di L .sul CC postale N. 19740208 

intestato a Editronica Srl, Corso Monforte 39, 20122 Milano. 

□ Pago fin d’ora con la mia carta di credito Bankamericard N. 

scadenza . 

Data..Firma. 

□ Desidero fattura. Il mio C.Fisc./P.lvaè:. 

□ Desidero ricevere il catalogo completo dei libri disponibili. 

Ritagliare e spedire a: Editronica Srl, Corso Monforte 39,20122 Milano. 



















AÉappkz computer 


computer shop 
centro dimostrativo 
Apple //c, //e, Macintosh e Lisa 
accessori e periferiche 
materiali di consumo 
software per tutte le esigenze 
assistenza tecnica 
corsi regolari a tutti i livelli 
consulenza 

vendita, affitto, leasing 


□nsaii 

H I Informatica 


Computer Shop 

viale Brigale panlglane 132 r. 
Genova 

Programmazione, 
Assistenza e Corsi 

Via GL D'Annunzio 2/46 
Genova 

TeL (010) 589327-592627 


Mcipplc computer 


lettere 


tutte e tre le piste occupate 
dal Dos, ma solo due. ho ap¬ 
portato delle semplici modi¬ 
fiche per ovviare a questo 
inconveniente e sono: 


340 FOR X = 56 TO 67 
STEP 4: POKE 8192 + 
X,255 : POKE 8193 + 
X,255: NEXT 370 HOME: 
PRINT” ORA CANCEL¬ 
LO LE TRACCE $0-$2”. 
410 FOR X = OTO 2. 


Paolo Mondini 
Virgilio 

I trucchi 
e il manuale 

Tralascio i complimenti 
per i redattori di Applicando 
e passo subito a delle piccole 
ma amichevoli critiche: 

1) nel n. 3, a pag. 82, sve¬ 
late un “trucco” per il //e che 
però si trova casualmente 
nel posto più ovvio e cioè nel 
manuale d’uso ...del //e. 
Certo, è bene che ci rinfre¬ 
schiate la memoria. Ma pre¬ 
feriremmo conoscere so¬ 
prattutto i segreti veri dei 
nostri computer. 

2) nel n. 4, a pag 10, date 
notizia di un prezioso mar¬ 
chingegno (costo finale: cir¬ 
ca 95.000 lire) che serve per 
fare la tacca sui dischetti in 
modo da poterli usare sul re¬ 
tro. Vi prego di informare 
gli altri lettori, soprattutto i 
neofiti del computer, che il 
sottoscritto - così come cen¬ 
tinaia di altri applisti - fa le 
.tacche sui dischetti con un 
paio di ottime forbici da can¬ 
celleria (marca Esselte) ed 
un tagliatutto (marca Kai- 
cut), senza aver mai subito il 
minimo inconveniente. Co¬ 
sto degli “attrezzi” suddetti 
(che però servono per tante 
altre cose): circa 10.000 lire. 

3) poiché la stessa Apple 
ammette (pag. 75 Manuale 
utente Apple //e) che si pos¬ 
sono usare schede prodotte 
da altre ditte, perché non 
pubblicare prove comparate 
di varie schede in commer¬ 
cio, sia per 80 col. +64K, sia 


Z80 per CP/M, sia per disk 
drivers etc. etc.? 

4) nel pubblicare recen¬ 
sioni su software o hardware 
in commercio, sarei lieto se 
pubblicaste per ogni articolo 
una scheda con le informa¬ 
zioni essenziali: produttore, 
distributore, indirizzo, prez¬ 
zo delLarticolo, numero 
unità disco richieste etc.. 

A. Emilio Guarisco 
Ribera (Ag) 

Sempre Pasqua 

Vorrei sottoporre un pro¬ 
grammino che sulla base di 
alcuni calcoli consente di 
calcolare la data di Pasqua, 
a partire dall'anno 1583. 
Quindi, valido per tutti gli 
anni del calendario Giulia¬ 
no. Per trovare la data di Pa¬ 
squa è sufficiente battere 
l’anno per il quale si deside¬ 
ra effettuare la ricerca. 

Giovanni Mascellaro 
Palermo 


3 CALL - 936: IWERSE : PRINT * 
COPYR16HT<C) 1984 BY 6I(MWJ 
MASCELLARO*: FOR PAUSE = 1 TO 
3000: NEXT PAUSE: NORTCL 

5 HOME : PRINT TAB< 11) # *LA DAT 

A DI PASQUA** 

6 PRINT TAB< lì)* - 

.••• ■ 

10 PRINT : PRINT : PRINT : HTAB 
14: INPUT -ANIO : ";Z 
20 X = INT <2 / 19) 

30 V = INT (Z - 19 * X) 

40 Q = INT <Z / 100) 

50 R = INT (Z - Q / 100) 

60 S = INT (Q / 4) 

70 T = INT (Q - 4 * S) 

80 U = INT «Q 4 8) / 25) 

90 A = INT «Q - U 4 1) / 3) 

100 Y = 19 * V 4 Q - S - A 4 15 
110 Y1 = INT (Y / 30) 

120 B = INT <Y - Y1 * 30) 

130 C = INT (R / 4) 

140 D = INT (R - C * 4) 

150 J = 32 4 2 * T 4 2 * C - B - 
D 

160 J1 = INT (J / 7) 

170 E = INT <J - J1 * 7) 

180 F = INT «V ♦ 11 * 6 4 22 * 

E) / 451) 

190 U = 8 4 E - 7 * F 4 IH 
200 6 = INT (W / 31) 

210 H = INT (W - 31 * 6) 

220 H = H 4 1 

230 IF 6 = 3 GOTO 250 

240 IF G = 4 GOTO 260 

250 PRINT : PRINT : PRINT : PRINT 

TAB< 13)*» *;H;* MRZ0 »*: VTAB 
22: HTAB 1: PRINT *<0) PER C 
0NTINUARE, SPAZIO PER FINIRE 
*5! GET GN$ 

251 GOTO 261 

252 GOTO 262 

260 PRINT : PRINT : PRINT : PRINT 
TAB< 13)** , :H;* APRILE »*: 

VTAB 22: HTAB I: PRINT *<0> 

PER CONTINUARE, SPAZIO PER 

FINIRE*;: GET GM$ 

261 IF GM$ = *0" THEN 5 

262 HOME : END 
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Le pagine gialle 
del software 

Vorrei conoscere tutti i 
programmi sia di tipo ammi¬ 
nistrativo che di tipo scienti¬ 
fico che possano essere utili 
in un istituto di microbio¬ 
logia. 

Prof. A. Turano 
Brescia 

I programmi che Appli¬ 
cando mette a disposizione 
dei lettori vengono pubblica¬ 
ti nella rubrica Disk Service. 

Per avere informazioni 
più dettagliate su quasi tutti i 
programmi che girano su 
computer Apple commercia¬ 
lizzati da software-house o 
dalla stessa APPLE con re¬ 
lativi prezzi e informazioni, 
è opportuno consultare il ca¬ 
talogo PAGINE GIALLE 
DEL SOFTWARE 
APPLE. 

Elogio 
del Visidex 

Ho letto su Applicando n. 
4 l’articolo «Elogio del Visi¬ 
dex» e sono d’accordo che si 
rivela una preziosa agenda, 
basti osservare i promemo¬ 
ria che vengono mostrati ap¬ 
pena si fa partire il disco da¬ 
ti: se inseriti senza data ven¬ 
gono visualizzati tutte le vol¬ 


te; se invece la data è defini¬ 
ta, vengono mostrati alcuni 
giorni prima (fino a due set¬ 
timane) della scadenza. 

Molto interessante è an¬ 
che l’uso dell'archivio: ho 
predisposto un modulo per i 
libri della biblioteca e per le 
riviste scientifiche impaga¬ 
bile per la sua rapidità di ri¬ 
cerca. Uniche pecche una 
certa laboriosità nei coman¬ 
di e l'impossibilità di usare 
le 80 colonne che riducono 
molto lo spazio di ogni sche¬ 
da e rende la sua stampa un 
po' bruttina. È possibile ri- 
mediare in qualche 
maniera? 

Prof. Massimo d’Ambrosio 
Roma 

Il Visidex non è predispo¬ 
sto per essere usato con le 80 
colonne. Per ottenere un ri¬ 
sultato, provi ad espandere 
lateralmete i caratteri della 
stampante prima di attivare il 
visidex utilizzando i vari 
PRINT CHR$ che vengono 
consigliati dal manuale. 

La differenza 
tra II e //e 

Recentemente ho sosti¬ 
tuito il mio APPLE II plus 
con l'APPLE//e e la scheda 
80 colonne. Vorrei quindi 
sapere da voi: 


1) Come modificare l’AP¬ 
PLE WRITER 1.0 affinché 
si possano usare anche le mi¬ 
nuscole. Durante la fase di 
editor, infatti, i numeri e gli 
spazi vengono riprodotti sul 
monitor con altri caratteri. 
E possibile modificarlo o lo 
devo buttare ? Lo posso mo¬ 
dificare in modo tale da po¬ 
ter usare anche la scheda 80 
colonne? 

2) Come è possibile fare 
l’hard copy del monitor 
quando è in funzione la 
scheda 80 colonne ? Ho cer¬ 
cato inutilmente la mappa 
video con l’uso della suddet¬ 
ta scheda, però non sono 
riuscito a trovarla in nessun 
testo. 

3) È possibile utilizzare il 
Visicalc con la scheda 80 co¬ 
lonne? Se sì', come? 

Edoardo Gerbelli 
Calusco d’Adda 

Non c'è nessuna compati¬ 
bilità tra l'Apple Writer 1.0 e 
l'Apple Ile. L'unica possibi¬ 
lità è quella di trasformare i 
file dal vecchio al nuovo 
Word Processing per mezzo 
di un 'opzione di conversione 
contenuta nel Word Proces¬ 
sing. Per ottenere le minu¬ 
scole sull'Apple // bisogna 
eseguire trasformazioni al- 
l'hardware compromettendo 
così ogni tipo di garanzia. 


L'utilizzo delle 80 colonne 
nell'Apple Writer II è auto¬ 
matico, cioè il programma 
cerca negli slot se è inserita la 
scheda 80 colonne e se questa 
esiste la attiva. Questa opzio¬ 
ne non esiste sul Visicalc , che 
dovrà quindi essere usato 
con il solito scorrimento del 
foglio elettronico sullo 
schermo. 


Trucchi di Apple 

Ho scoperto una CALL 
che credo sia utile a chi usa 
la grafica. Battendo CALL - 
3100 riappare la pagina hgr 
in modo misto (grafica + 4 
linee di testo). Battendo 
CALL -3100: POKE - 
16302,0 si ottiene solo la se- 
conda pagina grafica 
(HGR2). 

In questo modo è possibi¬ 
le risparmiare i tre poke per 
la ricomparsa della pagina 
grafica e cioè POKE - 
16297,0: POKE -16300,0: 
POKE -16301,0 rispettiva¬ 
mente - alta risoluzione - pa¬ 
gina I - misto grafica testo. 
Inoltre l’istruzione RÉSU¬ 
MÉ xxx del MBasic può es¬ 
sere simulata in Applesoft 
con CALL -32988: GOTO 
xxx. 

Vincenzo Boiano 
Napoli 


V, 
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Listati senza fatica 

I programmi pubblicati su Applicando possono es¬ 
sere trascritti dai lettori e salvati su dischetto. Ma la 
trascrizione è lenta e noiosa. Chi lo desidera può 
richiederci i dischetti sotto indicati, già pronti. Chi 
desiderasse anche il dischetto con i programmi 
STATISTICHE, SCANNER e FIGURATI UN PO’ può 
ottenerlo gratis. Abbonandosi ad Applicando. 


★ AP4/N07. Dischetto con i programmi 
LETTURA SPRINT in versione italiana e 
LETTURA SPRINT con frasi in inglese 
(pag. 26), ROMPIQUINDICI (pag. 47), 
TASTIERINO FANTASMA (pag. 73), e 
ROUTINE DI INPUT (pag. 76). Lire 
30.000 (Abbonati Lire 25.000). 


AP4/A08. Dischetto dati VisiDex BAN¬ 
CA DATI APPLE (pag. 41). Occorre Visi¬ 
Dex. Lire 30.000 (Abbonati Lire 25.000). 

AP4/A09. Dischetto Pascal (occorre 
Language Card o Apple Ile) con i pro¬ 
grammi ORGANO, VIOLINO, PIANO¬ 
FORTE (pag. 21). Lire 30.000 (Abbonati 
Lire 25.000). 


★ AP3/IN05. Dischetto con i programmi 
SISTEMA BASE (pag. 14), ETICHETTE 
(pag. 36), CONTRATTI (pag. 58), DADI E 
PUNTI (pag. 67) e GRAN CATALOGO 
(pag. 82). Lire 30.000 (Abbonati Lire 
25.000). 



AP3/A06. Dischetto dati VisiCalc EQUO 
CANONE (pag. 44). Occorre VisiCalc. 
Lire 25.000 (Abbonati Lire 20.000). 


★ AP1/I02. Dischetto con i programmi 
PROFITTI PER FAVORE (pag. 38), CA¬ 
LENDARIO PERPETUO (pag. 54), e I 
TRONCHI DEL TESORO (pag. 66). Lire 
30.000 (Abbonati Lire 25.000). 


★ AP1/N03. Dischetto con i programmi 
ELIMINATORE DI DOS (pag. 28), ORO¬ 
LOGIO (pag. 44), e PRONTI PUNTARE 
FUOCO! (pag. 46). Lire 30.000 (Abbonati 
Lire 25.000). 

★ AP2/IN04. Dischetto con i programmi 
COSTI CHILOMETRICI (pag. 14), RI¬ 
CHIAMA FIGURE (pag. 44), LASER NEL¬ 
LO SPAZIO (pag. 46), e CURVE DI 
PRESSIONE (pag. 57). Lire 30.000 (Ab¬ 
bonati Lire 25.000). 

★ AP5/N09. Dischetto con i programmi 
AGENDA PERSONALE (pag. 23), DUEL¬ 
LO D’ARTIGLIERIA (pag. 30), MELE E 
FRECCETTE (pag. 63). Lire 30.000 (Ab¬ 
bonati Lire 25.000). 

AP5/NQ8. Dischetto con il programma 
INVESTOR (pag. 34) Lire 70.000 (Abbo¬ 
nati Lire 60.000). 

★ AP6/N10. Dischetto con i programmi: 
OBBLIGAZIONI - BOND MANAGER 
(pag. 27) PUCMAN - NIBBLER (pag. 39) 
e LINEFINDER (pag. 55). Lire 30.000 
(Abbonati lire 25.000). 

★ AP6/N11. Dischetto con il program¬ 
ma: STRESS (pag. 45). Lire 55.000 (Ab¬ 
bonati lire 45.000). 

★ I dischetti contrassegnati con asterisco 
contengono anche il programma TOMBOLA, 
omaggio natalizio di Applicando e di Compu- 
shop, Via Nomentana 265-273, Roma. 


Compilare e spedire il tagliando qui sotto a Applicando, Editronica Srl., Corso Monforte 39, 20122 Milano 


Vogliate inviarmi i seguenti dischetti: 


n. 


n. 


n.. 


n.. 


n.. 


n.. 


/ 


/ 


n._ 

Sono abbonato: sì □ no □ 


Cognome.Nome. 

Via.Cap. 

Città.Prov... 

Scelgo la seguente formula di pagamento: 

□ allego assegno di L .non trasferibile intestato a Editronica srl. 

□ allego ricevuta versamento di L.sul cc/p n. 19740208 intestato a 

Editronica srl - Corso Monforte, 39 - 20122 Milano 

□ pago fin d’ora l’importo di L .con la mia carta 

di credito BankAmericard N.. v . 

scadenza.....autorizzando la Banca 

d’America e d’Italia ad addebitarne Timporto sul mio conto BankAmericard. 


Data....Firma. 
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Il valore di ogni Flexible Disc è il risultato della 
integrazione tra il dischetto ed il suo contenuto. 

Il contenuto è il prodotto della vostra intelligenza, del vostro la¬ 
voro, del vostro tempo. 

Il contenuto sono i dati che servono per informarvi sull’anda¬ 
mento della vostra Azienda e per permettervi di gestirla, che ren¬ 
dono fluide le procedure del vostro ufficio, che riempiono di se¬ 
renità e di divertimento il vostro tempo libero. 

Con Memorex il contenuto del vostro Flexible Disc, sia da 8” che 
da 5” 1/4, o da 3” 1/2 è. protetto dalla tecnologia che è frutto 
di più di 25 anni di sviluppo sia dei prodotti magnetici che delle 
tecniche di registrazione e che ha permesso di raggiungere livel¬ 
li altissimi di affidabilità, durata ed uniformità della produzione. 


È importante, scegli Memorex 
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